![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
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;
Все работает. Может где подвох.