TabSheet zur Laufzeit erstellen klappt nicht

[Nalincah]

Bei mir zeigt der nichts an. Warum?

Delphi-Quellcode:

procedure DBOpen;
var
  Tab:TTabSheet;
 begin
  // Tabsheet für die Tabelle erstellen
  Tab := TTabSheet.Create(FrmMain.PageControlDB);
  Tab.Parent := FrmMain.PageControlDB;
  Tab.Show;
end;