TGroupBox macht Probleme mit Visual Styles

[OregonGhost]

In meinem Programm werden bei aktivierten Visual Styles die GroupBoxes nicht richtig gezeichnet, genauer wird der Titel einfach abgeschnitten (siehe Screenshot).
In Delphi 6 hat es noch funktioniert mithilfe des Theme Managers, aber jetzt in Delphi 7 (wo es keinen Theme Manager mehr für gibt) funktioniert es nicht. Was kann man da tun?
Gibt es eventuell entweder eine Bug-bereinigte Version der GroupBox oder eine Möglichkeit, nur für die GroupBox den Visual Style abzuschalten?

[Bernhard Geyer]

Wenn Du alle Updates für D7 installiert hast dann sieht es schlecht aus. D7 hat bei XP-Themes immer noch ein paar Macken. Dir bleiben nur noch 2 Möglichkeiten:

1, Umstellung auf bessere Komponenten (z.B. Elpack mit eigenem XP-Theme-Support), was jedoch einen größern Umstellungswaufwand bedeutet (Und ein paar € kosted)

2, Einfach 1-2 Leerzeichen am Ende ergänzt. Evtl. machst Du einfach deine Ableitung der Groupbox welche bei aktiven XP-Themes leerzeichen ergänzt. Dazu könntest Du die Methoden SetCaption/GetCaption überschreiben.

[OregonGhost]

Ich habe mir schon fast gedacht, dass eine Ableitung hier ein guter Weg ist...
Danke für den Tipp mit Get/SetCaption, das Problem ist nur, dass ich nicht weiß, wie viele Leerzeichen ich anfügen muss, das scheint variabel zu sein (je nach Theme). Mal sehen, vielleicht überschreibe ich einfach den kompletten Zeichencode, wird nur doof bzgl. Vorhandensein von uxtheme und so. Außerdem habe ich nur Delphi 7 Personal -> kein VCL-Quellcode, und wenn ich das richtig sehe, komme ich als Besitzer der Promo-Version (c't) nicht in die Downloadarea für die Updates...

Na, mal schauen. Geld ausgeben wollte ich dafür jedenfalls keins ;c)