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

Вниз

alt+f4   Найти похожие ветки 

 
Jenek   (2004-08-25 09:46) [0]

Как при использовании программы отключить сочетание клавиш Alt+F4


 
VMcL ©   (2004-08-25 09:56) [1]

OnCloseQuery
?


 
Vit@ly ©   (2004-08-25 10:00) [2]

public
 procedure AppMessage(var Msg: TMSG; var HAndled: Boolean);
end;

{...}

implementation

{...}

procedure TForm1.FormCreate(Sender: TObject);
begin
 Application.OnMessage := AppMessage;
end;

procedure TForm1.AppMessage(var Msg: TMSG; var Handled: Boolean);
begin
 Handled := False;
 case Msg.Message of
   WM_SYSKEYDOWN:
     if Msg.wParam = VK_F4 then
       Handled := True; // don"t allow ALT-F4
 end;
end;



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

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

Наверх




Память: 0.46 MB
Время: 0.035 c
6-1087974793
ИМХО
2004-06-23 11:13
2004.09.12
Спецам по TWebBrowser у


3-1092632990
Mamed
2004-08-16 09:09
2004.09.12
Bag v AdODB i WebBrowser


1-1093361023
Nat
2004-08-24 19:23
2004.09.12
Click по dbGrid


14-1093492515
Zloy
2004-08-26 07:55
2004.09.12
Какой язык подходит для создания собственной ERP-системы???!!!!!


3-1092651951
Lizka
2004-08-16 14:25
2004.09.12
как редактировать DBEdit?