Hallo zusammen,
UxTheme.GetThemeSysFont ist falsch deklariert. Der letzte Parameter muss ein LOGFONTW (
Unicode) sein. In Delphi 2007 ist er aber als LOGFONTA (
ANSI) deklariert. Dadurch schreibt die Funktion GetThemeSysFont über das Ende von lLogFont hinaus und trifft dabei auf lRect.
Herzlichen Dank!
Die Lösung fünktioniert perfekt und beide Zeilen werden ausgegeben.
Auch im eigentlichen Kompo-Code funktionert es jetzt perfekt.
Ich glaube ich muss mir jetzt noch die anderen UxTheme-Funktionen anschauen, denn das UxTheme.DrawThemeTextEx gibt bei mir auch keinen Text aus.
Ist das ein Delphi-Fehler, der immer noch exisiert, oder ab welcher Version wurde er behoben?