Desktop Darstellung ändern

[adecke]

Hallo,

hab die halbe nacht gesucht und nichts gefunden.
Möchte gerne den Desktop anpassen läuft im Moment so.

Delphi-Quellcode:

procedure SetColors
var 
 Element: Integer;
 NewColor: TColor;
begin
 NewColor := clRed;
 Element := color_background;
 SetSysColors(Element, Element, NewColor);

 PostMessage(HWND_BROADCAST,WM_SETTINGCHANGE,0,0); 
 // Diverse Message wurden getestet z.B. auch WM_SYSCOLORCHANGE
end;

Das System übernimmt auch die Farbe. Leider ist dies aber nur
temporär. Nach einem Logoff/Reboot steht die alte Farbe wieder
drin. Irgenwie muss es doch möglich sein die Einstellung permanent
zu halten. Geht ja über den Dialog auch. Bin um jede Hilfe od. Tip
dankbar.

gruss adecke

[Luckie]

Die Einstellungen werden wohl irgendwo in der Registry gespeichert sein, wo auch sonst.

[Sprint]

Zitat:

Zitat von adecke

Das System übernimmt auch die Farbe. Leider ist dies aber nur temporär. Nach einem Logoff/Reboot steht die alte Farbe wieder drin.

Steht ja auch so im Platform SDK: The SetSysColors function changes the current session only. The new colors are not saved when the system terminates.[/quote]

mmh... ich dachte auch immer das es mit SetSysColors geht.

[adecke]

Hi,

ja, an dem SetSysColor hab ich auch meinen Narren gefressen. Es ist mir
schleierhaft warum es damit nich geht (gehen soll). Was passiert eigenlich wenn
ein User im Dialog eine Farbe usw. ändert und auf den Übernehmen-Button
klickt. Setzt man die Farben mit SetSysColor so werden diese Änderungen
wohl im Dialog angezeigt, aber der Übernehmen Button ist Disabled.