Как перед закрытием приложения...

← →
Начинаю (2002-08-08 16:29) [0]

Мастера, подскажите.
Как перед закрытием приложения проверить условие.
Если оно выполнено, то выполнить действие и закрыть приложение.
Если нет, просто закрыть приложение.

← →
Skier © (2002-08-08 16:33) [1]

>Начинаю
Создай обработчик OnCloseQuery у главной формы
приложения и напиши примерно так :

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean); begin if YourCondition then CanClose := True else CanClose := False; end;

← →
Ura (2002-08-08 16:33) [2]

Обработай событя в головной форме CloseQuery
----
Че то сделать ... и установить
CanClose := True; // закрыть
CanClose := False ; // незакрыть
----

← →
Начинаю (2002-08-09 10:30) [3]

Спасибо!

Как перед закрытием приложения... Найти похожие ветки