Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.04;
Скачать: [xml.tar.bz2];




Вниз

Alt+f4 


Ted   (2002-01-03 10:38) [0]

Помогите кто нибудь!
Не могу разобраться почему в запущеной форме отслеживающей Alt+f4
при нажатии и удержании Alt+f4 форма закрывается?

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if (ssAlt in Shift) and (key = Vk_F4) then
MessageDlg("Нажато Alt+f4)", mtInformation, [mbOK],0)
else

MessageDlg("не нажато Alt+f4", mtInformation, [mbOK],0);
Как отключить закрытие формы???




Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.04;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.031 c
14-9288           Ежик                  2002-01-14 15:06  2002.03.04  
Подскажите плииз где можно скачать Windows 3.1


3-9076            Demon ltd             2002-02-06 23:58  2002.03.04  
Показ в данных выборочно из таблицы


4-9329            solsoft               2001-12-28 10:19  2002.03.04  
Прокрутка текста колесом мыши


1-9139            kaif                  2002-02-17 12:56  2002.03.04  
Почему много ссылок на BPL?


6-9251            Ohtori_Akio           2001-12-15 18:20  2002.03.04  
TClientSocket (используемый внутри TServerThread.ClientExecute) не видит обрыва сессии