易语言取窗口信息源码

系统结构:取窗口位置信息,取指定位置控件句柄,取鼠标位置,取窗口标题1,句柄取进程ID,取类名,取色1,

======窗口程序集1
           |  |
           |  |------ _时钟1_周期事件
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   取窗口位置信息
           |  |
           |  |---[dll]------   取指定位置控件句柄
           |  |
           |  |---[dll]------   取鼠标位置
           |  |
           |  |---[dll]------   取窗口标题1
           |  |
           |  |---[dll]------   句柄取进程ID
           |  |
           |  |---[dll]------   取类名
           |  |
           |  |---[dll]------   取色1

调用的DLL命令:

.DLL命令 取窗口位置信息, 整数型, "user32.dll", "GetWindowRect"
    .参数 句柄, 整数型
    .参数 大小, 控件位置, 传址

.DLL命令 取指定位置控件句柄, 整数型, "user32.dll", "WindowFromPoint"
    .参数 X轴光标, 整数型
    .参数 Y轴光标, 整数型

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

.DLL命令 取窗口标题1, , "user32", "GetWindowTextA"
    .参数 窗口句柄, 整数型, , 欲获取文字的那个窗口的句柄
    .参数 缓冲区, 文本型, , 预定义的一个缓冲区，至少有cch+1个字符大小；随同窗口文字载入
    .参数 缓冲尺寸, 整数型, , lp缓冲区的长度;

.DLL命令 句柄取进程ID, 整数型, , "GetWindowThreadProcessId", 公开, 线程_取ID
    .参数 hwnd, 整数型, , 指定窗口句柄
    .参数 进程标识符, 整数型, 传址, 用于装载进程ID的变量

.DLL命令 取类名, 整数型, , "GetClassNameA", 公开, 窗口_取类名 为指定的窗口取得类名　以字节数表示的类名长度；排除最后的空中止字符。零表示出错。会设置GetLastError
    .参数 句柄, 整数型, , 欲获得类名的那个窗口的句柄
    .参数 文本, 文本型, 传址, 随同类名载入的缓冲区。预先至少必须分配nMaxCount+1个字符
    .参数 文本长度, 整数型, , 由lpClassName提供的缓冲区长度;

.DLL命令 取色1, 整数型, "gdi32.dll", "GetPixel"
    .参数 设备场景句柄, 整数型
    .参数 X坐标, 整数型
    .参数 Y坐标, 整数型