ALT+F4 Опции

[Maks de Pascal]

Помогите разобраться как сделать чтоб форма не закрывалась по ALT+F4

[mj]

Форма закроется если нажать на крестик и держать при этом Shift

// событие формы OnCloseQuery
procedure TForm.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
  CanClose := (ssShift in GetShiftState);
  if not CanClose then
    Hide;
end;

[mj]

Нажатие на крестик и Alt+F4 вызывают одно событие, так что вышенаписанное будет действовать как для крестика, так и для Alt+F4

[CJ]

В обработчик события OnClose даеш запрет!

[Max]

       Просто обработай событие OnCloseQuery, и он будет выдавать запрос на сохранение!
 Кажется...

[Matvey]

Попробуй в событии OnKeyDown написать обработчик нажатия Alt+F4,а
в нем Form1.Show. Должно работать, если я тебя правильно понял!

А на дату поста Вы смотрели? Скоро 2 года топику...

[klem4]

Matvey, тема была актуальна 2 года назад <_<