控制面板大全 P0ZY;/e5h
ra}t#Xt`
在程序运行过程中启动控制面板的各个设置功能: Q=h37]U+
var x:cardinal; Rgb&EnVW
begin =i:,")W7=
{启动控制面板} {+jO/ZQu5
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL',9); Q3rLCg,;
{辅助选项 属性-键盘} }.N~jx0R
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL access.cpl,,1',9); c_Jcy
{辅助选项 属性-声音} 1{.5X8y1x
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL access.cpl,,2',9); i#:M2&twE
{辅助选项 属性-显示} <|1Kh ygv
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL access.cpl,,3',9); L|Bjw3K&D
{辅助选项 属性-鼠标} w-P;E!gTt
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL access.cpl,,4',9); y,Z2`Zmu
{辅助选项 属性-常规} ("P]bU+'>
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL access.cpl,,5',9); 3T~DeqAyw
{添加/删除程序 属性-安装/卸载} c!]Q0ib6
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Appwiz.cpl,,1',9); g>;"Fymc'
{添加/删除程序 属性-Windows安装程序} Mk8k,"RG&Z
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Appwiz.cpl,,2',9); 9\!=i
{添加/删除程序 属性-启动盘} Rh%C$d(
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Appwiz.cpl,,3',9); Svt%*j
{显示 属性-背景} Z. ,pcnaQb
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL desk.cpl,,0',9); !dOpLUh l
{显示 属性-屏幕保护程序} C=x70Y/
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL desk.cpl,,1',9); k|3hs('y|
{显示 属性-外观} cQrXrij;!
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL desk.cpl,,2',9); l0=VE#rFl
{显示 属性-设置} NfND@m{/
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL desk.cpl,,3',9); ', P_a,\
{Internet 属性-常规} 9;fs'R
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Inetcpl.cpl,,0',9); TF~cDn
{Internet 属性-安全} :4[_&]H
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Inetcpl.cpl,,1',9); FXh*!%"*
{Internet 属性-内容} SS!b`
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Inetcpl.cpl,,2',9); 9gac7(2`)
{Internet 属性-连接} He1~27+99
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Inetcpl.cpl,,3',9); F0ylJ
/E
{Internet 属性-程序} hq?F81
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Inetcpl.cpl,,4',9); \]0+J
{Internet 属性-高级} =}'7}0M_=
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Inetcpl.cpl,,5',9); 2?kVbF
{区域设置 属性-区域设置} D*t[5,~j
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Intl.cpl,,0',9); 58t~? 2E
{区域设置 属性-数字} h(p cGE
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Intl.cpl,,1',9); O:Wd
,3_
{区域设置 属性-货币} p<c1$O*
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Intl.cpl,,2',9); &"d
:+!4h
{区域设置 属性-时间} vDCbD#.6
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Intl.cpl,,3',9); JfRqOEP4Y
{区域设置 属性-日期} ufo\p=pGG
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Intl.cpl,,4',9); &Xi]0\M)
{游戏控制器-一般} lm|s%
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Joy.cpl,,0',9); m'WGK`WIm
{游戏控制器-高级} BFZ\\rN`
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Joy.cpl,,1',9); ?I"FmJ;
{鼠标 属性} ?KG4Z
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Main.cpl',9); ~(]'ah,
{多媒体 属性-音频} A u"BDP
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Mmsys.cpl,,0',9); TGuCIc0B{
{多媒体 属性-视频} t(1gJZs>kX
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Mmsys.cpl,,1',9); T'a&
{多媒体 属性-MIDI} `a5,5}7v%`
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Mmsys.cpl,,2',9); A`1-c
{多媒体 属性-CD音乐} &'u%|A@
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Mmsys.cpl,,3',9); ';LsEI[
{多媒体 属性-设备} <K
<|G
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Mmsys.cpl,,4',9); <SiJA`(7
{调制解调器 属性} )i[K1$x2
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Modem.cpl',9); F&HvSt}l5
{网络} _mTNK^gB
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Netcpl.cpl',9); `2`h4[^ [X
{密码 属性} # blh9.V&F
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Password.cpl',9); pV*d"~T
{扫描仪与数字相机 属性} ~h$
H@&5
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Sticpl.cpl',9); .F3~eas
{系统 属性-常规} VVqpzDoXG
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Sysdm.cpl,,0',9); oxLO[js
{系统 属性-设备管理器} x LGMN)@r
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Sysdm.cpl,,1',9); rges`&0
{系统 属性-硬件配置文件} %'eaW
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Sysdm.cpl,,2',9); jvhD_L/
{系统 属性-性能} Tsocc5gWZ*
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Sysdm.cpl,,3',9); h9QQ8}g
{日期/时间 属性} 7%W@Hr,%F
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL timedate.cpl',9); ihD|e&
{电源管理 属性} '![VA8
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Powercfg.cpl',9); G0(A~Q"
{拨号属性} e}ivvs2
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Telephon.cpl',9); $]MOAj"LH
U04)XfO;]
!,{-q)'D
将图表变为真彩色 -BH T'zq1S
HKEY——CURRENT——USER KN~Rep cz@
Control Panel uFL!*#A
Control Panel @%!Gj{
windowmetrics 新建字符串值 SHELL ICON BPP “16”