OnClose

← →
john_mag © (2005-06-09 16:13) [0]

Добрый вечер,господа! Ни кто не подскажет каким обработчиком поймать закрытие формы. В Events(е) формы вижу OnClose, а процедуру, чтобы поймать событие закрытия формы щелчком мыши на верхнем правом углу(где [х]), не могу сообразить как написать, или её нету(в смысле стандартной)? Извините сразу за запутанность вопроса, надеюсь, вы разгребете... :-)

← →
Digitman © (2005-06-09 16:16) [1]

> не могу сообразить как написать

да хоть как ее напиши !
хоть // в ней напиши)
лишь бы компилятор не ругался)
а факт ее, твоей процедуры, вызова и есть факт того что ты "поймал событие".

← →
-=S.S=- © (2005-06-09 16:19) [2]

А какая разница как вы её закрываете ?
Все равно OnClose вызоветься!

← →
john_mag © (2005-06-09 16:21) [3]

Че прям так и писать ?
Procedure Form1.OnClose(Sender:TObject);
begin
......
end;

← →
Плохиш © (2005-06-09 16:26) [4]

OnCloseQuery

← →
Digitman © (2005-06-09 16:26) [5]

> Че прям так и писать ?

прям так и пиши)

если ты не в состоянии дабл-кликнуть в Инспекторе Объектов на соотв.пункте

Спасибо за наводящие смешки! :-) Процедура получилась такая...

procedure TForm5.FormClose(Sender: TObject; var Action: TCloseAction);
begin
DeleteFile("C:\Apteka\DataBase\Defecture.DAT");
end;

> john_mag © (09.06.05 16:31) [6]

не ты ли спрашивал, "каким образом .. поймать" ?)

какая бы ни получилась - компилятор, думаю, отнесся к ней благосклонно, и ты "поймал" то что "ловил" ...

с уловом тебя !)

а уж что ты там вытворяешь в ее "теле" - это твои проблемы) ... полный простор там тебе для творчества)

OnClose Найти похожие ветки