Форум: "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.017 c
1-9102            С_&#  2002-02-13 16:20  2002.03.04  
Нужна Помощь HELP!!!!


1-9237            dim2001               2002-02-13 19:48  2002.03.04  
стандартный диалог


3-9075            Vks                   2002-02-05 12:19  2002.03.04  
Есть несколько относительно больших баз......


3-9071            latvija               2002-02-06 14:53  2002.03.04  
Господа програмисты подскажите кто знает .


1-9117            romulas               2002-02-13 14:33  2002.03.04  
Help!!!