Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.08.21;
Скачать: [xml.tar.bz2];

Вниз

Owner.Free   Найти похожие ветки 

 
Still Swamp   (2003-08-06 11:29) [0]

Вместе закрытием формы я хочу извести объект ее породивший.

создание формы MyForm:=TForm.Create(MyObject);
если я на MyFromOnClose сделаю Owner.Free, то объект родительский MyObject будет разрушен, но далее произойдет исключительная ситуация.

Как мне выкрутиться?


 
Семен Сорокин   (2003-08-06 11:32) [1]

MyForm:=TForm.Create(nil);


 
Still Swamp   (2003-08-06 11:35) [2]

ниии.... Owner мне надо передать.
Окошко MDI
На момент MyFormOnActivate в окне этот самый Owner мне уже нужен.
А у MDI OnActivate вызывается сразу после Create. Те в Create уже нужно передавать Owner.


 
Семен Сорокин   (2003-08-06 11:46) [3]

Still Swamp (06.08.03 11:35)
перепиши конструктор

constructor TForm1.Create(AOwner: TComponent);
begin
inherited Create(nil);
FOwner := AOwner
end;


 
Still Swamp   (2003-08-06 12:15) [4]

Это тоже вариант не очень.
Тогда уж
Constructor TForm.Create(AOwner:TComponent; MyObject:TComponent);

но это как то тоскливо....



 
Семен Сорокин   (2003-08-06 12:21) [5]

можно еще так:

destructor TForm1.Destroy;
begin
inherited Destroy;
FOwner.Free
end;


:))


 
Fay   (2003-08-06 12:26) [6]

FOwner.Release; 8)


 
Still Swamp   (2003-08-06 14:30) [7]

о! во! оно.



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

Форум: "Основная";
Текущий архив: 2003.08.21;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.008 c
1-68370
XenonXX
2003-08-08 08:22
2003.08.21
Поиск, оптимизация.


14-68519
Yanis
2003-07-30 16:14
2003.08.21
Сохранение


3-68220
Insider
2003-07-24 01:30
2003.08.21
Синхронное изменение полей типа Date


14-68496
Математ
2003-08-04 19:12
2003.08.21
Математическая бибилиотека


14-68521
anana][
2003-08-04 17:48
2003.08.21
Как поменять права пользователю?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский