易语言管理菜单源码

系统结构:读回窗口位置,将被销毁保存位置,方向,鼠标是否在窗口范围内,窗口处理函数,计时器清零,显示列表框图标,ianz_添加工具_被选择,取鼠标位置_,取窗口矩形_,是否在矩形内_,设置窗口信息_,呼叫窗口函数地址_,复制内存_,复制内存1_,查找文件_,关闭搜索句柄_,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 读回窗口位置
           |  |
           |  |------ 将被销毁保存位置
           |  |
           |  |------ __启动窗口_将被销毁
           |  |
           |  |------ __启动窗口_位置被改变
           |  |
           |  |------ _时钟1_周期事件
           |  |
           |  |------ _时钟2_周期事件
           |  |
           |  |------ 方向
           |  |
           |  |------ 鼠标是否在窗口范围内
           |  |
           |  |------ 窗口处理函数
           |  |
           |  |------ 计时器清零
           |  |
           |  |------ __启动窗口_尺寸被改变
           |  |
           |  |------ 显示列表框图标
           |  |
           |  |------ _科技蓝_被选择
           |  |
           |  |------ _水晶兰_被选择
           |  |
           |  |------ __启动窗口_可否被关闭
           |  |
           |  |------ _高级选择夹1_子夹头被单击
           |  |
           |  |------ _按钮设置_被单击
           |  |
           |  |------ ianz_添加工具_被选择
           |  |
           |  |------ _高级选择夹1_子夹头被点燃
           |  |
           |  |------ _退出_被选择
           |  |
           |  |------ __启动窗口_托盘事件
           |  |
           |  |------ _时钟4_周期事件
           |  |
           |  |------ _时钟3_周期事件
           |  |
           |  |------ _打开_被选择
           |  |
           |  |------ _超级列表框常用_表项被激活
           |  |
           |  |------ _超级列表框办公_表项被激活
           |  |
           |  |------ _超级列表框网页_表项被激活
           |  |
           |  |------ _超级列表框游戏_表项被激活
           |  |
           |  |------ _删除_被选择
           |  |
           |  |------ _超级列表框常用_右键单击表项
           |  |
           |  |------ _超级列表框办公_右键单击表项
           |  |
           |  |------ _超级列表框网页_右键单击表项
           |  |
           |  |------ _超级列表框游戏_右键单击表项
           |  |
           |  |------ _添加_被选择
           |  |
           |  |------ _关于_被选择
           |  |
           |  |
======窗口程序集3
           |  |
           |  |------ _按钮选择_被单击
           |  |
           |  |------ _按钮确认_被单击
           |  |
           |  |------ _窗口1_创建完毕
           |  |
           |  |------ _按钮确认1_被单击
           |  |
           |  |------ _编辑框路径_内容被改变
           |  |
           |  |------ _编辑框名称_内容被改变
           |  |
           |  |------ _编辑框网页名称_内容被改变
           |  |
           |  |------ _编辑框网址_内容被改变
           |  |
           |  |
======窗口程序集2
           |  |
           |  |------ _窗口2_创建完毕
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |
======窗口程序集4
           |  |
           |  |------ _窗口3_鼠标左键被按下
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   取鼠标位置_
           |  |
           |  |---[dll]------   取窗口矩形_
           |  |
           |  |---[dll]------   是否在矩形内_
           |  |
           |  |---[dll]------   设置窗口信息_
           |  |
           |  |---[dll]------   呼叫窗口函数地址_
           |  |
           |  |---[dll]------   复制内存_
           |  |
           |  |---[dll]------   复制内存1_
           |  |
           |  |---[dll]------   查找文件_
           |  |
           |  |---[dll]------   关闭搜索句柄_

调用的DLL命令:

.DLL命令 取鼠标位置_, 整数型, "user32", "GetCursorPos", , GetCursorPos
    .参数 位置, 坐标_

.DLL命令 取窗口矩形_, 整数型, "user32", "GetWindowRect", , GetWindowRect
    .参数 窗口句柄, 整数型
    .参数 矩形区域, 矩形_

.DLL命令 是否在矩形内_, 整数型, "user32", "PtInRect", , PtInRect这个函数判断指定的点是否位于矩形lpRect内部
    .参数 lpRect, 矩形_, 传址
    .参数 x坐标, 整数型
    .参数 y坐标, 整数型

.DLL命令 设置窗口信息_, 子程序指针, "user32", "SetWindowLongA", , 在窗口结构中为指定的窗口设置信息　指定数据的前一个值
    .参数 窗口句柄, 整数型, , hwnd，欲为其取得信息的窗口的句柄
    .参数 窗口信息值, 整数型, , nIndex，请参考GetWindowLong函数的nIndex参数的说明
    .参数 窗口信息新值, 子程序指针, , dwNewLong,由nIndex指定的窗口信息的新值;

.DLL命令 呼叫窗口函数地址_, 整数型, "user32.dll", "CallWindowProcA", , CallWindowProcA将消息传答窗口函数　
    .参数 前一窗口函数地址, 子程序指针, , lpPrevWndFunc
    .参数 窗口句柄, 整数型, , hwnd
    .参数 消息值, 整数型, , msg
    .参数 附加参数1, 整数型, , wParam
    .参数 附加参数2, 整数型, , lParam

.DLL命令 复制内存_, , "kernel32", "RtlMoveMemory", , 　CopyMemory
    .参数 pDest, 整数型
    .参数 pSrc, MINMAXINFO
    .参数 ByteLen, 字节型

.DLL命令 复制内存1_, , "kernel32", "RtlMoveMemory", , CopyMemory1　
    .参数 pDest, MINMAXINFO
    .参数 pSrc, 整数型
    .参数 ByteLen, 字节型

.DLL命令 查找文件_, 整数型, "kernel32", "FindFirstFileA", , 根据文件名查找文件　如执行成功，返回一个搜索句柄。如果出错，返回一个INVALID_HANDLE_VALUE常数，一旦不再需要，应该用FindClose函数关闭这个句柄
    .参数 文件名, 文本型, , 欲搜索的文件名。可包含通配符，并可包含一个路径或相对路径名
    .参数 文件信息, WIN32_FIND_DATA

.DLL命令 关闭搜索句柄_, 整数型, "kernel32", "FindClose", , 关闭由FindFirstFile函数创建的一个搜索句柄　非零表示成功，零表示失败。会设置GetLastError
    .参数 搜索句柄, 整数型, , 由FindFirstFile函数提供的搜索句柄;