Caption-Text eines TabSheet-Reiters farbig ausgeben

[r29d43]

Hi,

gibt es eigentlich eine plus minus einfache Möglichkeit, den Caption-Text eines TabSheet-Reiters farbig o. unterstrichen ausgeben zu können?

Ich habe zwei TabSheets in einem PageControl und möchte je nach "kritischem Inhalt" eines der TabSheets dessen TabSheet-Caption dann in roter Farbe oder unterstrichen outputten. Natürlich könnte man zur Not diesbezüglich auch noch irgendwelche visuellen Info-Flags sonstwohin setzen, imo wäre das mit einer farbigen TabSheet-Caption für mich jetzt aber das eleganteste.

Mit der TabSheet-Property "Font.Color" geht es jedenfalls leider nicht.

(Als Notlösung hätte ich hier sonst nur noch, für diese Caption primär nur Blanks einzusetzen und den eigentlichen Caption-Text dann mit einem darübergesetzten TStaticText-Label entsprechend zu simulieren.)

Thx im Voraus.
Gruß