易语言句柄操作类模块源码

系统结构:创建,通过标题创建,通过类名创建,通过标题类名创建,取当前句柄,发送信息,发送文本信息,取标题,取内容,置内容,取类名,销毁,可视,禁止,总在最前,取父句柄,取子句柄,寻找子句柄_类名,寻找子句柄_标题,取上一个句柄,取下一个句柄,取窗口风格,取窗口扩展风格,按钮_点击,SendMessage,SendMessage2,GetClassName,GetWindowText,FindWindow,ShowWindow,GetParent,GetWindow,EnableWindow,GetWindowLong,SetWindowPos,FindWindowEx,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ _临时子程序
           |  |
           |  |
======句柄操作类
           |  |
           |  |------ _初始化
           |  |
           |  |------ _销毁
           |  |
           |  |------ 创建
           |  |
           |  |------ 通过标题创建
           |  |
           |  |------ 通过类名创建
           |  |
           |  |------ 通过标题类名创建
           |  |
           |  |------ 取当前句柄
           |  |
           |  |------ 发送信息
           |  |
           |  |------ 发送文本信息
           |  |
           |  |------ 取标题
           |  |
           |  |------ 取内容
           |  |
           |  |------ 置内容
           |  |
           |  |------ 取类名
           |  |
           |  |------ 销毁
           |  |
           |  |------ 可视
           |  |
           |  |------ 禁止
           |  |
           |  |------ 总在最前
           |  |
           |  |------ 取父句柄
           |  |
           |  |------ 取子句柄
           |  |
           |  |------ 寻找子句柄_类名
           |  |
           |  |------ 寻找子句柄_标题
           |  |
           |  |------ 取上一个句柄
           |  |
           |  |------ 取下一个句柄
           |  |
           |  |------ 取窗口风格
           |  |
           |  |------ 取窗口扩展风格
           |  |
           |  |------ 按钮_点击
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   SendMessage
           |  |
           |  |---[dll]------   SendMessage2
           |  |
           |  |---[dll]------   GetClassName
           |  |
           |  |---[dll]------   GetWindowText
           |  |
           |  |---[dll]------   FindWindow
           |  |
           |  |---[dll]------   ShowWindow
           |  |
           |  |---[dll]------   GetParent
           |  |
           |  |---[dll]------   GetWindow
           |  |
           |  |---[dll]------   EnableWindow
           |  |
           |  |---[dll]------   GetWindowLong
           |  |
           |  |---[dll]------   SetWindowPos
           |  |
           |  |---[dll]------   FindWindowEx

调用的DLL命令:

.DLL命令 SendMessage, 整数型, , "SendMessageA"
    .参数 hwnd, 整数型
    .参数 a, 整数型
    .参数 b, 整数型
    .参数 c, 整数型

.DLL命令 SendMessage2, 整数型, , "SendMessageA"
    .参数 hwnd, 整数型
    .参数 a, 整数型
    .参数 b, 整数型
    .参数 c, 文本型

.DLL命令 GetClassName, 整数型, , "GetClassNameA"
    .参数 hwnd, 整数型
    .参数 name, 文本型
    .参数 nMaxCount, 整数型

.DLL命令 GetWindowText, , , "GetWindowTextA"
    .参数 hwnd, 整数型
    .参数 name, 文本型
    .参数 nMaxCount, 整数型

.DLL命令 FindWindow, 整数型, , "FindWindowA"
    .参数 class, 文本型
    .参数 title, 文本型

.DLL命令 ShowWindow, 整数型, "user32", "ShowWindow"
    .参数 hwnd, 整数型
    .参数 nCmdShow, 整数型

.DLL命令 GetParent, 整数型, , "GetParent", 公开, user32.dll判断指定窗口的父窗口  父窗口的句柄。如窗口没有父，或遇到错误，则返回零。
    .参数 窗口句柄, 整数型, , 欲测试的窗口的句柄;

.DLL命令 GetWindow, 整数型, , "GetWindow", , 获得一个窗口的句柄，该窗口与某源窗口有特定的关系
    .参数 源窗口, 整数型
    .参数 关系, 整数型

.DLL命令 EnableWindow, , , "EnableWindow"
    .参数 hwnd, 整数型
    .参数 bEnable, 逻辑型

.DLL命令 GetWindowLong, 整数型, "user32.dll", "GetWindowLongA"
    .参数 句柄, 整数型
    .参数 信息, 整数型

.DLL命令 SetWindowPos, 逻辑型, "user32.dll", "SetWindowPos"
    .参数 hWnd, 整数型
    .参数 hWndlnsertAfter, 整数型
    .参数 X, 整数型
    .参数 Y, 整数型
    .参数 cx, 整数型
    .参数 cy, 整数型
    .参数 Flags, 整数型

.DLL命令 FindWindowEx, 整数型, "user32", "FindWindowExA", 公开, , 在窗口列表中寻找与指定条件相符的第一个子窗口  找到的窗口的句柄。如未找到相符窗口，则返回零。会设置GetLastError
    .参数 窗口句柄1, 整数型, , 在其中查找子的父窗口。如设为零，表示使用桌面窗口（通常说的顶级窗口都被认为是桌面的子窗口，所以也会对它们进行查找）
    .参数 窗口句柄2, 整数型, , 从这个窗口后开始查找。这样便可利用对FindWindowEx的多次调用找到符合条件的所有子窗口。如设为零，表示从第一个子窗口开始搜索
    .参数 欲搜索的类名, 文本型, , 欲搜索的类名。“”表示忽略
    .参数 欲搜索的标题, 文本型, , 欲搜索的标题。“”表示忽略;