Zitat:
Delphi-Quellcode:
procedure TMyPanel.Create(AOwner: TComponent);
begin
inherited;
Panel1 := TPanel.Create(self);
Panel1.Parent := self;
Owner.InsertComponent(Panel1);
end;
Warum hinterher verbiegen, wenn man auch gleich den richtigen Owner übergeben könnte?
Delphi-Quellcode:
constructor TMyPanel.Create(AOwner: TComponent);
begin
inherited;
Panel1 := TPanel.Create(Owner); // aka Self.Owner, anstatt nur Self
Panel1.Parent := Self;
end;
Und daß sich Komponenten nur im
OI bearbeiten lassen, wenn sie die Form als Owner besitzen, wurde gleich zu Beginn von jemandem erwähnt.
(rate mal wer AOwner/Owner des MyPanel ist)