Aktives TabSheet farblich hervorheben

[Chemiker]

Hallo,

Zitat:

Hallo,

das aktive Sheet ist doch im Vordergrund, deutlicher gehts nicht - und dazu gibt es noch die Eigenschaft Hilighted.

Gruss Reinhard

Bei einem PageControl ist es noch deutlich, aber wenn man innerhalb des TabSheet einen weiter PageControl mit mehren TabSheet hat ist es für einen Benutzer nicht immer so deutlich.

Mit Highlighted wir der Tabsheet permanent farblich hervorgehoben und nicht nur der Aktive.

Zitat:

Moin Chemiker,

Du müsstest dazu nur die Eigenschaft OwnerDraw des PageControls auf true setzen, und kannst dann im Ereignis OnDrawTab das Tab nach Herzenslust gestalten.

Mit dem Aufruf in dem Ereignis OnDrawTab

TabSheet1.Brush.color := clred; verschwindet die Bezeichnung der Reiter und die Farbe wird erst beim 2 wechsel des Tabsheets angezeigt.

Bis bald Chemiker