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

Вниз

Клавиши!!   Найти похожие ветки 

 
Серега   (2003-03-23 00:14) [0]

Ув. мастера!! Как сделать чтобы программа не закрывалась по Alt+F4.


 
Guerrillero ©   (2003-03-23 00:50) [1]

обрабатывай событие OnCloseQuery главной формы


 
spogi   (2003-03-23 01:14) [2]

On KeyDown

If (Key = VK_F4) and (ssAlt in Shift) then
Key=#0;

{
ssAlt in Shift
[ssAlt]=Shift
}
//sintaksis ne pomnyu, posmani v help


 
Intell ©   (2003-03-23 18:06) [3]

procedure TForm1.FormCreate(Sender: TObject);
begin
KeyPreview := true;
end;

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if ((ssAlt in Shift) and (Key = VK_F4)) then Key := 0;
end;


 
Serega   (2003-03-23 18:32) [4]

Всем спасибо вы мне очень помогли!!!



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

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

Наверх




Память: 0.47 MB
Время: 0.02 c
9-6287
JB
2002-10-28 09:58
2003.04.03
Спрайты для игры


1-6504
Andrej
2003-03-24 16:42
2003.04.03
из нижнего регистра в верхний и наобород


3-6297
Jurij
2003-03-16 16:06
2003.04.03
SQL запрос


3-6309
Val_123
2003-03-17 12:06
2003.04.03
Перечитать таблицу


14-6670
Ihor Osov'yak
2003-03-17 11:52
2003.04.03
Прошу не принять за провокацию...