模板
教程
环境
性能
功能
管理
程序: 使用 API 开始屏幕保护
发表于：2007-07-02来源：作者：点击数：
标签：
*---------------------------------------------------------------------
* 使用 API 开始屏幕保护 设计： 红雨
*---------------------------------------------------------------------
Declare integer SendMessage in user32 integer,integer,integer,integer
Declare integer GetDesktopWindow in WIN32API
lnHwnd = GetDesktopWindow()
#Define wMsg 0x0112 && 274
#Define wPsave 0xF140 && 61760
? SendMessage(lnHwnd, wMsg, wPsave, 0) && 开始屏幕保护
Clea dlls
Return
