Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.01.21;
Скачать: CL | DM;

Вниз

По(ту)сторонние звуки   Найти похожие ветки 

 
Константин   (2001-11-17 21:50) [0]

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

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 - точно, в остальных не пробовал. Что ей не нравится?


 
Anatoly Podgoretsky ©   (2001-11-17 23:11) [1]

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


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

key:=0


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

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


 
Anatoly Podgoretsky ©   (2001-11-19 23:27) [4]

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


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

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



Страницы: 1 вся ветка

Текущий архив: 2002.01.21;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.006 c
4-66395
HMR
2001-11-19 20:02
2002.01.21
ShellExecute(Application.Handle, open , http:// ,nil,nil, SW_HIDE);


14-66338
Христос
2001-11-24 14:42
2002.01.21
WinApi


4-66402
ДедушкаКо
2001-11-19 14:45
2002.01.21
Из осн. удалили...не понял почему. Попробую здесь...


1-66290
VadX
2002-01-03 21:22
2002.01.21
Окно программы....


1-66286
Строр
2002-01-04 15:23
2002.01.21
опять про трей