Hintergrundfarbe des AKTIVEB Tabsheets ändern

[juergen]

Hallo Bob68!
Vielen, vielen Dank! Das sieht schon sehr gut aus!
Allerdings bekomme ich es mit Delphi 2005 PE (noch) nicht ganz ans Laufen!
Anstatt TabControl verwende ich PageControl....
In deinem Code schreibst du:

TextOut(Rect.Left + 4, Rect.Top + 4, TabControl1.Tabs[TabIndex]); Was muss ich anstelle von TabControl1.Tabs verwenden???
Klar, erst einmal PageControl1. ?????

Ich habe es probiert mit PageControl1.ActivePage und PageControl1.ActivePageIndex
Bei ersterem kommt der Fehler:
[Fehler] rechner.pas(1509): E2149 Klasse besitzt keine Standardeigenschaft

Verwende ich ActivePageIndex kommt Fehler:
[Fehler] rechner.pas(1509): E2016 Array-Typ erforderlich


Kann mir hier abschließend jemand weiterhelfen?

Viele Grüße
Jürgen