Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.09.05;
Скачать: CL | DM;

Вниз

Как проверить создана ли моя форма, метод assigned не работает   Найти похожие ветки 

 
Eugene ©   (2002-08-25 23:24) [0]

Здравствуйте.
Как узнать есть ли на самом деле моя форма и почему после метода MyForm.Release метод Assigned(Myform) выдает True ?
Заранее спасибо.


 
Юрий Зотов ©   (2002-08-25 23:29) [1]

Потому что при уничтожении объекта ссылки на него не обнуляются, это надо делать ручками.


 
Ученик ©   (2002-08-25 23:30) [2]

в TMyForm.OnDestroy

MyForm := nil;


 
kull ©   (2002-08-26 01:14) [3]

Что вы все к Release пристали? Вам что Close нехватает?

MyForm.Close;
MyForm := nil;


либо

MyForm.Close;
MyForm.Free;
MyForm := nil;


зависит от формы.

И никаких OnClose и OnDestroy ловить не надо, т.к. Close ждет когда форма закроется а Release - нет.


 
Ученик ©   (2002-08-26 01:38) [4]

>kull © (26.08.02 01:14)
Borland рекомендует Release


 
kull ©   (2002-08-26 01:42) [5]

Может, конечно, я упустил из виду его рекомендацию, но ни в одном из его примеров в каталоге Demos нет вызова Release, а только Close.


 
Ученик ©   (2002-08-26 01:50) [6]

>kull © (26.08.02 01:42)
TObject.Free, TCustomForm.Release


 
Ученик ©   (2002-08-26 01:52) [7]

Имелось ввиду помощь по:


 
Eugene ©   (2002-08-26 03:47) [8]

Всем большое спасибо.


 
kull ©   (2002-08-26 11:27) [9]

А ведь я, пожалуй неправ был...
Release ждет когда закроется форма. У Release пожалуй есть свои достоинства.

Но вот в примерах я не нашел вызовов Release. И к тому же если использовать Close, то можно в OnClose управлять закрытием формы через параметр Action.


 
Игорь Шевченко ©   (2002-08-26 12:14) [10]

kull © (26.08.02 11:27)

Догмы нету. Release используется в обработчиках событий той формы, которую надо закрыть. Free - извне.



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

Текущий архив: 2002.09.05;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.012 c
3-13900
slav
2002-08-14 17:29
2002.09.05
формат даты в результате запроса из ib firebird


6-14202
neodiX
2002-06-12 19:51
2002.09.05
Посылка jpg через UDP


1-14042
yar
2002-08-26 18:02
2002.09.05
TwebBrouser


1-14073
CrazyAngel
2002-08-23 19:21
2002.09.05
dll+newform


3-13885
Aon
2002-08-13 09:06
2002.09.05
Не могу отобразить корректно данные из MySQL