Текущий архив: 2002.09.16;
Скачать: CL | DM;
Вниз
Help Найти похожие ветки
← →
MelkoSoft (2002-08-20 13:52) [0]Люди, помогите пожалуйста.
Я чайник в делфе. Подскажите плиз, как зделать, что бы по ALT-F4 окно не закрывалось, то есть вообще не подавало ни какой реакции
Заранее благодарен.
← →
France (2002-08-20 13:55) [1]procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action:=caNone
end;
← →
DiamondShark © (2002-08-20 14:39) [2]А вот и нифига не так. А вот так
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: boolean);
begin
CanClose := false;
end;
← →
RV © (2002-08-20 14:45) [3]конкретно по алт Ф4
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
if ((ssAlt in Shift) and (Key = VK_F4)) then Key:=0;
end;
← →
Просто мальчик (2002-08-20 15:15) [4]> DiamondShark © (20.08.02 14:39)
Это тоже хорошо, но теперь попробуй рестарт винды заделать!
← →
France (2002-08-20 15:19) [5]Ух ты!
← →
AL2002 © (2002-08-20 16:32) [6]Выдрать клавиши Альт и F4.
Страницы: 1 вся ветка
Текущий архив: 2002.09.16;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.014 c
