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