控制面板大全 Biwdb
Kc0OLcu^d
在程序运行过程中启动控制面板的各个设置功能: vp@+wh]#
var x:cardinal; =*Xf(mh c
begin MjTKM;
{启动控制面板} bB-v ar
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL',9); h'p0V@!N
{辅助选项 属性-键盘} ;>9pJ72r
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL access.cpl,,1',9); `%3p.~>
{辅助选项 属性-声音} ErC[Zh"''
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL access.cpl,,2',9); Cj+=9Dc
{辅助选项 属性-显示} ~~,<+X:
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL access.cpl,,3',9); >lmL
{辅助选项 属性-鼠标} K7c8_g*>4=
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL access.cpl,,4',9); _O%p{t'q<
{辅助选项 属性-常规} DG=Ap:sl*$
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL access.cpl,,5',9); ]o$/xP
{添加/删除程序 属性-安装/卸载} rUjr'O0
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Appwiz.cpl,,1',9); G65N:
{添加/删除程序 属性-Windows安装程序} m5N&7qgp
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Appwiz.cpl,,2',9); wlM
?gQXU[
{添加/删除程序 属性-启动盘} w ZAXfNA
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Appwiz.cpl,,3',9); ~0|hobk
{显示 属性-背景} 2\de |'
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL desk.cpl,,0',9); Fr3t[:D
{显示 属性-屏幕保护程序} x["
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL desk.cpl,,1',9); H@'
@xHv
{显示 属性-外观} bf/loMtD
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL desk.cpl,,2',9); I/jr`3Mj
{显示 属性-设置} XD }_9p
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL desk.cpl,,3',9); eB*8)gYh
{Internet 属性-常规} ;r"B?] JO
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Inetcpl.cpl,,0',9); |$2N$6\SP
{Internet 属性-安全} J
*?_SnZ
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Inetcpl.cpl,,1',9); Vz]=J;`Mz
{Internet 属性-内容} C:MGi7f
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Inetcpl.cpl,,2',9); ^^l"brPa
{Internet 属性-连接} z_@zMLs
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Inetcpl.cpl,,3',9); FaE orQ
{Internet 属性-程序} g"S+V#R
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Inetcpl.cpl,,4',9); d
A{Jk
{Internet 属性-高级} T(^8ki
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Inetcpl.cpl,,5',9); gq3OCA!cX
{区域设置 属性-区域设置} GuvF
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Intl.cpl,,0',9); :w%bw\}
{区域设置 属性-数字} FSs$ ]
d;
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Intl.cpl,,1',9); WI_mJ/2
{区域设置 属性-货币} #/<Y!qV&
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Intl.cpl,,2',9); 4 GW[GT
{区域设置 属性-时间} g}QTZT8
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Intl.cpl,,3',9); I>Fh*2
{区域设置 属性-日期} 4ZpF1Zc4B
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Intl.cpl,,4',9); 5O
;^Mk|
{游戏控制器-一般} z %E!tB2o
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Joy.cpl,,0',9); *%'7~58ObS
{游戏控制器-高级} G!%XQ\a!
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Joy.cpl,,1',9); {NgY8wQB
{鼠标 属性} \3?;[xD
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Main.cpl',9); &W//
Ox
)f
{多媒体 属性-音频} iGVb.=)
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Mmsys.cpl,,0',9); #-j!
;?
{多媒体 属性-视频} B-'BJ|*4I
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Mmsys.cpl,,1',9); 8k?L{hF|nW
{多媒体 属性-MIDI} n@[</E(
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Mmsys.cpl,,2',9); .BDRD~kB
{多媒体 属性-CD音乐} TJS1,3<
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Mmsys.cpl,,3',9); kTc5KHJ7
{多媒体 属性-设备} F{~r7y;0
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Mmsys.cpl,,4',9); BV?N_/DXp
{调制解调器 属性} e7qMt[.
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Modem.cpl',9); M;V#Gm
{网络} ]Wt6V^M'@
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Netcpl.cpl',9); )wv[!cYyW
{密码 属性} 4 ~YQ\4h=
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Password.cpl',9); Prz+kPP
{扫描仪与数字相机 属性} P Xn>x8z
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Sticpl.cpl',9); 1'm`SRX#e
{系统 属性-常规} {<4?o?
1g
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Sysdm.cpl,,0',9); )h_7 2
{系统 属性-设备管理器} !nBm}E7d
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Sysdm.cpl,,1',9); [k7N+W8
{系统 属性-硬件配置文件} fUKdC\WL
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Sysdm.cpl,,2',9); LY:?OGh
{系统 属性-性能} | O+>#
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Sysdm.cpl,,3',9); qS}RFM5|
{日期/时间 属性} BBE1}V!u
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL timedate.cpl',9); j{Jc6U
{电源管理 属性} ZfCr"aL
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Powercfg.cpl',9); gdFoTcHgO|
{拨号属性} NG!cEo:2aa
x:=winexec('rundll32.exe shell32.dll,Control_RunDLL Telephon.cpl',9); r9a!,^}F
&t|V:_?/x
AYu'ptDNr
将图表变为真彩色 !2U7gVt"*
HKEY——CURRENT——USER Mth`s{sATa
Control Panel @j2*.ee
Control Panel }rA+W-7
windowmetrics 新建字符串值 SHELL ICON BPP “16”