Owner einer Formulars nachträglich ändern

Thema durchsuchen

Ansicht

Themen-Optionen

Owner einer Formulars nachträglich ändern

Ein Thema von idefix2 · begonnen am 15. Jul 2010 · letzter Beitrag vom 15. Jul 2010

Vorheriger Beitrag

Nächster Beitrag

himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.576 Beiträge

Delphi 12 Athens

AW: Owner einer Formulars nachträglich ändern

15. Jul 2010, 10:10

Das Einfachste wäre hier, erst garkeinen Owner anzugeben.
... := TMyForm.Create(nil) .

markieren

Delphi-Quellcode:

			// Owner entfernen

MyForm.Owner.RemoveComponent(MyForm);

// Owner hinzufügen

NewOwner.InsertComponent(MyForm);

markieren

Delphi-Quellcode:

			procedure ChangeOwner(Component, NewOwner: TComponent);

begin

  if Assigned(Component.Owner) then

    Component.Owner.RemoveComponent(Component);

  if Assigned(NewOwner) then

    NewOwner.InsertComponent(Component);

end;

ChangeOwner(MyForm, NewOwner)