Форум: "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.74 MB
Время: 0.134 c
4-9348            Oxy2                  2001-12-28 14:25  2002.03.04  
Как вычислять системные цвета?


1-9140            dim2001               2002-02-17 17:40  2002.03.04  
вставка подпрограммы


14-9272           Ghost!                2002-01-11 20:42  2002.03.04  
Деление String по пробелу


6-9260            Nikolay               2001-12-17 22:15  2002.03.04  
только не бейте ногами


14-9280           Феликс                2002-01-14 22:03  2002.03.04  
А у вас глючил Делфи?