IPB
ЛогинПароль:

> ВНИМАНИЕ!

Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.

> Вопрос по использованию системной даты в программе
1147
сообщение 27.06.2009 22:47
Сообщение #1


Бывалый
***

Группа: Пользователи
Сообщений: 205
Пол: Мужской
Реальное имя: Евгений

Репутация: -  0  +


В программе нужно постоянно вводить текущую дату в dbedit1. Видел такой вариант, когда вместо того чтобы вводить дату самому, при нажатии пробела автоматически вводится сначала число, затем при втором нажатии пробела - месяц, при третьем год и сразу же переход курсора в dbedit2. Т.е. программа берет системную дату и помещает ее в нужное поле. Подскажите пожалуйста, как реализовать такой вариант???
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме
1147   Вопрос по использованию системной даты в программе   27.06.2009 22:47
volvo   К примеру, так: uses DateUtils; // ... procedure T...   28.06.2009 0:06
1147   а можно пояснить строки?: 0: curr.Text := Fo...   28.06.2009 0:46
volvo   А тот модуль, который приведен первой строкой, ты ...   28.06.2009 0:54
1147   Понятно, все замечательно получается, вот только ч...   28.06.2009 1:11
volvo   Так? procedure TForm1.DBEdit1KeyPress(Sender: TObj...   28.06.2009 1:30
1147   Большое спасибо за неоценимую помощь, основная про...   28.06.2009 1:48
1147   А можно ли использовать автоматический ввод даты д...   7.07.2009 0:38
volvo   Подменяем стандартный InPlace редактор на DBEdit, ...   7.07.2009 0:59
1147   Для этого необходимо чтобы в DBEdit уже стояла дат...   7.07.2009 1:13
1147   Это не совсем то что хотелось бы... Нельзя ли без ...   9.07.2009 18:17
volvo   Если поле, хранящее дату - пустое, то при клике по...   9.07.2009 18:40
1147   возникает ошибка: "dataset not in edit or ins...   13.07.2009 14:40
volvo   Я тоже... Код, приведенный выше, тестировался, и о...   13.07.2009 15:56


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия 8.07.2025 2:00
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"