Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Почему срабатывает KeyDown


dido ©   (2004-06-27 17:50:00) 

Почему срабатывает KeyDown после введения неполной даты (четыре цифры)? Неудобно когда нечаяно нажмешь Enter.


Cardinal   (2004-06-27 19:56:00) [1]

KeyDown срабатывает при нажатии клавиши в поле редактирования
(т.е. когда клавиша уже вдавлена). Если тебе надо выполнять что-то по нажатию Enter, то (в полной дате ведь 9 знаков)

procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
 Shift: TShiftState);
begin
if (key=13)and(length(edit1.Text)=9) then {действия}
end;

А лучше для этого дела используй MaskEdit.


begin...end   (2004-06-27 19:07:00) [2]

Так OnKeyDown вроде должен срабатывать после нажатия каждой клавиши. Или нет?


dido   (2004-06-27 18:59:00) [3]

Введения в Edit.


begin...end   (2004-06-27 17:52:00) [4]

Введения куда?


Наверх

Титульная страница Поиск, карта сайта Написать письмо