Objekt mit 2 Objekten erstellen

[DeddyH]

Ja, entweder

Delphi-Quellcode:

if AOwner is TWinControl then
  Parent :=  TWinControl(AOwner);

oderParent := AOwner as TWinControl; Was jetzt besser ist, hängt davon ab, wie man verfahren möchte. Die erste Version setzt den Parent nur, wenn es sich um TWinControl handelt, die zweite wirft ggf. eine Exception.