Mal TPageControl mit .Style= tsButtons oder tsFlatButtons ausprobiert?
Die Tabs an zur Seite und du hast den alten Stil.
Auch unten stimmt es nicht ganz, aber dort nur falschrum und nicht gleich anders, weil es diesen Stil garnicht gibt.
Oder du mußt eben das
VCL-Theme für diese Komponente deaktivieren,
dann hast'e es auch immer im wunderhübschen Windows 2000-Stil.
TPageControl und bei allen TabSheets das .TabVisible=False
und dazu dann noch ein TTabControl, TTabSt, TDockTabSet, eine Button-Group oder irgendwas Eigenes.
oder ein TCardPanel mit anderem TabControl/TabSet/...
oder die uralten TNotebook und TTabbedNotebook (neee, ist ein Witz)
oder was ganz Anderes, wie z.B. TCategoryPanelGroup?