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

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

SpinEdit по Enterу


AL2002 ©   (2002-08-19 19:40:00) 

Хочу чтобы, набрав, значение в SpinEdite и нажав Enter сработало какое-то событие. Бьюсь-бьюсь – и нифига, только бипает.
Поставил KeyPreview на форме – ловит #13, но если не #13, то не даёт ввести значения (опять, сволочь, бипает). Как?


AL2002   (2002-08-19 22:20:00) [1]

>Не поняла, но специально проверила без всяких KeyPreview
Да, оно. Правда, я уже плюнул на этот спинэдит и вместо него юзаю простой людский эдит. Но спасибо. Я про кейдаун в спИне даже не подумал.


alena.svt   (2002-08-19 22:08:00) [2]

Не поняла, но специально проверила без всяких KeyPreview

procedure TForm1.SpinEdit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key = VK_RETURN then
Showmessage("Enter")
end;

Все работает. Может где подвох.


Наверх

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