怎样打开屏幕保护的配置窗口?(50分)

H

hahabb

Unregistered / Unconfirmed
GUEST, unregistred user!
怎样打开屏幕保护的配置窗口?
 
var x:cardinal;
begin

x:=winexec('rundll32.exe shell32.dll,Control_RunDll desk.cpl,,1',9)
end;
 
我要打开特定屏幕保护的配置窗口,就像选择一个屏幕保护后,在快捷菜单种选择“设置”
 
我查了一下scr文件的关联方式,其中
1.C:/WINDOWS/rundll32.exe desk.cpl,InstallScreenSaver %l 安装
2."%1" /S 测试
3. "%1" 设置

打开特定的设置窗口: winexec('"c:/windows/desktop/a.scr"',SW_NORMAL);
成功通过!
 
'filename.scr /C'
 
加-s参数为运行屏保
-c参数为配置
如果编写程序自己判断参数
运行时Windows自动加参数
 
ShellExecute(Form1,'Open','c:/windows/system/xyz.scr','-c',
'c:/windows/system',SW_SHOW);
试试看.xyz是屏保文件名
 
多人接受答案了。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
902
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
顶部