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

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

По(ту)сторонние звуки [D5, Win2k]


Константин ©   (2001-11-17 21:50:00) 

Почему такое происходит: выполнение такого кода

procedure TSomeForm.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key = vk_Return then
begin
SendMessage(SomeForm.Handle, WM_NEXTDLGCTL, 0, 0);
end;
end;

работает правильно (переходит на следующий контрол), но вызывает стандартный звук системы типа beep или ding. В Win2k - точно, в остальных не пробовал. Что ей не нравится?


Добавлю   (2001-11-20 04:57:00) [1]

, который в последствии проверяется другой процедурой.


Anatoly Podgoretsky   (2001-11-19 23:27:00) [2]

Key не локальная переменная, а параметр передаваемый по ссылке


Константин   (2001-11-19 23:07:00) [3]

Я не понял, что именно нужно сделать. И самое главное, почему она пищит? По идее нужно сделать так, чтобы эта клавиша вроде как бы и не нажималась?
Key:=0 - это же локальная переменная, все равно она уничножается при выходе из процедуры.


Меня здесь нет и никогда не было   (2001-11-19 09:28:00) [4]

key:=0


Anatoly Podgoretsky   (2001-11-17 23:11:00) [5]

Ей не нравится vk_Return


Наверх

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