Скачать: CL | DM;

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

← →
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]

Благодарю

---

← →
SergP ©   (2004-05-08 08:34) [3]

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

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

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.023 c