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]

о! во! оно.

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