Как перехватить закрытие главного окна?

← →
MAXHO-2 (2004-05-08 01:22) [0]

Ув. мастаки, меня инетересует как можно сделать, чтобы при попытке закрыть главное окно програмы появлялось диалоговое окно с "Да/Нет" при нажатии на "Да" диалог исчезал а окно не закрывалось, соответсвенно на "Нет" закрывалось.

← →
DVM © (2004-05-08 01:24) [1]

1)
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
if ... then CanClose:=true else CanClose:=false;
end;

2) WM_SYSCOMMAND + SC_CLOSE

← →
MAXHO-2 (2004-05-08 01:31) [2]

Благодарю

>появлялось диалоговое окно с "Да/Нет" при нажатии на "Да" диалог исчезал
>а окно не закрывалось, соответсвенно на "Нет" закрывалось.

Интерестно, а какой текст должен быть написан в диалоговом окне, чтобы юзер правильно что ему нажимать? :-))))

Как перехватить закрытие главного окна? Найти похожие ветки