易语言屏幕保护程序(2003年大赛三等奖)源码

屏幕保护程序(易语言2003年大赛三等奖)

系统结构:响应事件,是否运行,取窗口名称,取桌面句柄,取窗口句柄,取窗口标题长度,取窗口标题,读配置,隐藏鼠标,锁键,写配置,

======窗口程序集1
| |
| |------ _按钮1_被单击
| |
| |------ _按钮2_被单击
| |
| |------ _窗口2_创建完毕
| |
| |------ _窗口2_将被销毁
| |
| |
======窗口程序集2
| |
| |------ _屏保窗口_按下某键
| |
| |------ _屏保窗口_创建完毕
| |
| |------ 响应事件
| |
| |------ _时钟1_周期事件
| |
| |------ _屏保窗口_鼠标位置被移动
| |
| |------ _屏保窗口_鼠标左键被按下
| |
| |------ _屏保窗口_鼠标右键被按下
| |
| |------ _屏保窗口_可否被关闭
| |
| |
======窗口程序集3
| |
| |------ _设密码窗口_创建完毕
| |
| |------ _按钮1_被单击
| |
| |------ _按钮2_被单击
| |
| |
======程序集1
| |
| |------ _启动子程序
| |
| |------ 是否运行
| |
| |------ 取窗口名称
| |
| |
======窗口程序集4
| |
| |------ _选择框1_被单击
| |
| |------ _设置窗口_创建完毕
| |
| |------ _按钮1_被单击
| |
| |------ _按钮2_被单击
| |
| |------ _按钮3_被单击
| |
| |------ _按钮4_被单击
| |
| |
======调用的Dll
| |
| |---[dll]------ 取桌面句柄
| |
| |---[dll]------ 取窗口句柄
| |
| |---[dll]------ 取窗口标题长度
| |
| |---[dll]------ 取窗口标题
| |
| |---[dll]------ 读配置
| |
| |---[dll]------ 隐藏鼠标
| |
| |---[dll]------ 锁键
| |
| |---[dll]------ 写配置

调用的DLL命令:

.DLL命令 取桌面句柄, 整数型, , "GetDesktopWindow"

.DLL命令 取窗口句柄, 整数型, , "GetWindow"
.参数 源窗口, 整数型
.参数 与源窗口的关系, 整数型

.DLL命令 取窗口标题长度, 整数型, , "GetWindowTextLengthA"
.参数 窗口句柄, 整数型

.DLL命令 取窗口标题, 整数型, , "GetWindowTextA"
.参数 窗口句柄, 整数型
.参数 窗口标题, 文本型
.参数 标题长度, 整数型

.DLL命令 读配置, 整数型, , "GetPrivateProfileStringA"
.参数 小节名, 文本型
.参数 项目名, 文本型
.参数 项目值, 文本型
.参数 缓冲区, 文本型, 传址
.参数 长度, 整数型
.参数 文件名, 文本型

.DLL命令 隐藏鼠标, , , "ShowCursor", , 隐藏鼠标
.参数 隐藏鼠标, 逻辑型, , 为假则隐藏鼠标，为真则不隐藏鼠标

.DLL命令 锁键, 整数型, , "SystemParametersInfoA"
.参数 参数, 整数型, , 锁功能键的常数为97
.参数 参数, 整数型, , 是否锁住功能键，1锁住，0解锁
.参数 参数, 整数型, , 设为0
.参数 参数, 整数型, , 设为0

.DLL命令 写配置, 整数型, , "WritePrivateProfileStringA"
.参数 小节名, 文本型
.参数 项目名, 文本型
.参数 项目值, 文本型
.参数 文件名, 文本型