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

Что происходит между OnClose и OnDestroy ?   Найти похожие ветки 

← →
BFG9k ©   (2005-10-28 18:37) [0]


procedure TForm1.OnDestroy(Sender:TObject);
begin
  ShowMessage("DESTOY");
end;

procedure TForm1.OnClose(Sender: TObject; var Action: TCloseAction);
begin
  ShowMessage("CLOSE");
end;


Результат работы программы : вылезает сообщение CLOSE и далее происходит ошибка. Вопрос : где она может произойти в таком случае ?

Пробовал делать так :


procedure TForm1.Destroy;
begin
  ShowMessage("DESTROY");
  inherited;
end;


Результат тот же : CLOSE видим, а DESTROY - нет.


← →
Leonid Troyanovsky ©   (2005-10-28 18:48) [1]


> BFG9k ©   (28.10.05 18:37)  

> procedure TForm1.OnClose(Sender: TObject; var Action: TCloseAction);
> begin
>   ShowMessage("CLOSE");
> end;

> Результат работы программы : вылезает сообщение CLOSE и
> далее происходит ошибка. Вопрос : где она может произойти
> в таком случае ?


Она происходит после OnClose. Но, очевидно, до OnDestroy.

Если б это была не главная форма, то путей после OnClose
было б еще больше (т.е., не все так уж и плохо).

--
Regards, LVT.


← →
BFG9k ©   (2005-10-28 18:50) [2]

Форма главная. Установил, что ShowMessage в OnDestroy ВООБЩЕ не работает. То есть туда попадает, но сообщение не выскакивает.


← →
Джо ©   (2005-10-28 18:53) [3]


> [2] BFG9k ©   (28.10.05 18:50)

По идее, оно должно "выскакивать", но тут же сниматься. Впрочем, сейчас нет времени проверить.


← →
Leonid Troyanovsky ©   (2005-10-28 18:55) [4]


> BFG9k ©   (28.10.05 18:50) [2]
> Форма главная. Установил, что ShowMessage в OnDestroy ВООБЩЕ
> не работает. То есть туда попадает, но сообщение не выскакивает.


Т.е., собс-но, куда надо ты попал.

--
Regards, LVT.


← →
BFG9k ©   (2005-10-28 19:01) [5]

Да, ошибку обнаружил, тема закрыта. Для последователей советую использовать OutputDebugString (дебагер не всегда работает корректно).


← →
fellix   (2005-10-28 19:02) [6]

Не используй ShowMessage .
Используй MessageBox(0,...<.code> .



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

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



Память: 0.46 MB
Время: 0.023 c
2-1130757736
syte_ser78
2005-10-31 14:22
2005.11.20
ошибка при вызове функции из dll


14-1130479491
Некто
2005-10-28 10:04
2005.11.20
Джаз


2-1130746871
kyn66
2005-10-31 11:21
2005.11.20
Создание компонента в RunTime с родителем, созданным в RunTime


14-1130386383
pavel_guzhanov
2005-10-27 08:13
2005.11.20
Как выглядели кнопки в ранних версиях Delphi?


2-1130458657
streptokok
2005-10-28 04:17
2005.11.20
вопрос чайника: как работать с картинками?




   Наверх