TabSheet zur Laufzeit eintragen?

[Tommy1988]

Vorher hatte ich es mal so probiert:

Delphi-Quellcode:

var
Tab: TTabSheet;
Memo: TMemo;
begin
  Tab := TTabSheet.Create(self);
  Tab.PageControl := PageControl2;
  Tab.Parent := PageControl2;
  Memo := TMemo.Create(self);
  Memo.Parent := PageControl2.ActivePage;
  Tab.Caption := 'Neuer Tab';

Das klappt soweit auch, wenn er das Memo nicht ständig auf TabSheet 1 schicken würde
Edit: Memo.Parent := Tab; Diese Zeile war es..

Danke Ich werd mir das mal ansehen alles und durchdenken