Вниз
Скачать: CL | DM;

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]


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


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

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


 
john_mag ©   (2005-06-09 16:31) [6]

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

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


 
Digitman ©   (2005-06-09 16:41) [7]


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


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

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

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

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



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

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



Память: 0.46 MB
Время: 0.024 c
14-1117626789
dr Tr0jan
2005-06-01 15:53
2005.06.29
Код Киева


1-1117879184
Kolan
2005-06-04 13:59
2005.06.29
Условная компиляция


14-1117710930
Andy BitOff
2005-06-02 15:15
2005.06.29
MakeCab.exe


3-1116279827
normandia
2005-05-17 01:43
2005.06.29
sum только по некоторым записям


14-1117819487
VEG
2005-06-03 21:24
2005.06.29
Кто заметил, когда пропал the5k.org ?




   Наверх