![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Отловить Enter
Runner © (2004-02-11 23:49:00)Как в приложении на WinAPI отловить нажатие клавиши Enter в EDIT'е: И как потом убрать этот пронзительный звук?
AKul (2004-02-12 12:20:00) [1]
> Runner (12.02.04 10:38) [5]
> А на WinAPI?
Получить WindowProc этого Edit'а, используя GetWindowLong(Handle,GWL_WNDPROC) и сохранить его. Установить свою WindowProc (используя SetWindowLong), в которой обрабатывать сообщения WM_CHAR и подобные. В случае обнаружения нажатия Enter'а - выполнить нужные действия и выйти из WindowProc. В противном случае передать управление сохраненной WindowProc.
Runner (2004-02-12 10:38:00) [2]> KosilkA © (12.02.04 10:34) [4]
А на WinAPI?
KosilkA (2004-02-12 10:34:00) [3]procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if ord(key)=13 then showmessage('ку-ку');
end;
Runner (2004-02-12 10:22:00) [4]%( )
хм... а как отловить нажатие Enter'а в EDIT'е, чтобы сделать что-то. Т.е. замутить свой обработчик такого события.
Runner (2004-02-12 10:15:00) [5]Неужели такой сложный вопрос?
Vit@ly (2004-02-12 10:15:00) [6]Отключи динамик.
Ключ: [HKEY_CURRENT_USER\Control Panel\Sound]
Параметр: Beep
Тип: REG_SZ
Значение: 'Yes' или 'No'