Hi ALL,
also ich hab nochmal genauer nachgeschaut und bin auf
Codeproject.com fündig geworden.
Das Programm, geschrieben in C++, kann die jeweiligen Theme-Elemente zeichnen und auch den Text ausgeben, in meiner gesuchten Farbe. Nur kapier ich nicht ganz wie.
Ich bin gerade hier:
Delphi-Quellcode:
var pcolor : TColorREF;
hhtheme : HTheme;
begin
hhTheme:= OpenThemeData(Application.handle,'Button;GroupBox');
if hhTheme = 0 then showMessage('0'); //Wenn HTheme nicht gefunden
GetThemeColor(hhTheme, BP_GROUPBOX, GBS_NORMAL,color,pcolor);
Configuration_General_Title_label.font.color := pcolor;
CloseThemeData(hhTheme);
end;
Ich bin mir nur nicht sicher was ich bei OpenThemeDate als Parameter angeben soll. Ich finde nirgends eine Doku darüber. Das
PSDK sagt nur:
Zitat:
hwnd =
Handle of the window for which theme data is required.
pszClassList = Pointer to a string that contains a semicolon-separated list of classes.
GetThemeColor ist ziemlich gut beschrieben.
Wenn ich das Probgramm aber starte, ist die Farbe trotzdem Schwarz und nicht Blau.