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

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

Как правильно обработать OnKeyDown? [Delphi, Windows]


Morthan ©   (2002-12-05 08:21:00) 

Тут у меня возник очень ламерский вопрос. Хочу, чтобы при нажатии на любую клавишу, издавался MessageBeep, просто для проверки. Делаю так:

procedure FormKeyDown(Sender : PControl; var Key : Longint; Shift : DWORD);
begin
MessageBeep(0);
end;


потом в программе вешаю это дело на Form.OnKeyDown:

Form := NewForm(Applet, "Form 1");
Form.OnKeyDown := TOnKey(MakeMethod(nil, @FormKeyDown));

Оно после нажатия пищит, а потом выдает Runtime error 255. В чем здесь может быть дело?


Gandalf   (2002-12-06 09:39:00) [1]


> Да и интересно стало, чем же OnKeyDown от прочих событий
> отличается?


Прнципиально - Ничем.

На дверях форума должно быть надпись - "Отбросив все надежды, сначала прочти FAQ, особенно последний вопрос". Это - намек.


Morthan   (2002-12-06 07:44:00) [2]

Да я, в принципе, MCK уже поставил, только оно ничего не компилирует... все жалуется на отсутствие каких-то модулей. То ли Дельфя кривые, то ли еще чего-то... А сносить Дельфя и ставить все заново не хочется: KOL-то работает! Вот и приходится извращаться. Да и интересно стало, чем же OnKeyDown от прочих событий отличается?


Alexander   (2002-12-05 21:39:00) [3]

Ну зачем что-то изобретать.
Если не хочется по какой-то причине использовать MCK (хотя я такой причины не понимаю - может объяснишь?), то хоть поставь её для создания рабочиъ примеров и таких вопросов возникать не будет!

Просто посмотри, как это там делается - универсальный способ решения вопросов.


Наверх

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