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