E语言 开启或关闭屏保代码

开启或关闭屏保代码利用user32.dll的SystemParametersInfoA并规定4个参数来控制屏幕保护

dll命令代码:.版本 2

.DLL命令 SystemParametersInfo, 整数型, "user32", "SystemParametersInfoA"    .参数 uAction, 整数型    .参数 uParam, 整数型    .参数 lpvParam, 整数型, , Any型,根据需要可以设置成不同的类型    .参数 fuWinIni, 整数型

程序代码:.版本 2

.子程序 _按钮1_被单击

SystemParametersInfo (15, 1, 0, 2)  ' 第二个参数是几秒后开始屏保

.子程序 _按钮2_被单击

SystemParametersInfo (17, 0, 0, 2)