如何设置桌面的背景颜色呢?(50分)

请问有谁知道如何设置桌面的背景颜色, 也就是 控制面板中 显示 属性中外观页定义的桌面颜色,

现在我想用程序来改写它, 我没有找到 api 函数, 通过跟踪注册表,我发现是改写的这儿的键值来

实现的:

[HKEY_USERS/S-1-5-21-1202660629-839522115-1957994488-1000/Control Panel/Colors]
"Background"="255 251 240"

但是我不知道 "S-1-5-21-1202660629-839522115-1957994488-1000" 是在每台机器都一样的吗?还

是根据不同的用户而不同呢? 我这里只有一台机器,没办法测试.

麻烦有谁知道如何设置桌面颜色, 给诉我一声,或者帮我看一下你机器上注册表的键值是否也是

这个名字呢?

设置桌面颜色:
procedure TForm1.Button2Click(Sender: TObject);
var
c,d:integer;
begin
c:=$0000ff; //红色
d:=color_background;
d:=color_desktop;
SetSysColors( 1,d,c);
end;

谢谢,可以更改桌面背景颜色了,
但每次重启机器后又会恢复到以前的颜色, 如何将更改后的颜色保存下来呢?

把你的颜色值写进注册表
就是那个'background'.
细节不用说了吧。

接受答案了.