Warum die Tabs nicht schon zu Designtime ausblenden?
TCM_ADJUSTRECT begrezt den Bereich, in welchem das PageControl seinen Inhalt zeichnen kann.
Tja, und hier wird einfach der Bereich verboten, wo der Rahmen liegt, womit er nicht gezeichnet werden kann.
Wieso es nur für Tabs oben oder unten funktioniert ... schau dir
case PageControl1.TabPosition of
an und rate mal warum.
PS: Wenn das verwendete Delphi schon
VCL-Skins kann, dann einfach einen rahmenlosen Skin für sein PageControl basteln
oder entsprechende Fremdkomponenten verwenden.