Du könntest dir mit einen Bitmap aushelfen.
Eine neue Komponente ala TPaintBox+TPageControl, welche intern ein normales TTabControl auf ein TBitmap zeichnet, dieses um 90° dreht und links neben einem TPageControl, ohne sichtbare Tabs, zeichnet.
Dann noch die Messages von der Paintbox abfangen, die Koordinaten um 90° drehen (wenn nötig) und ans interne TabControl weiterleiten.
Dann muß man nicht alles neumachen