易语言取任意窗口句柄源码

系统结构:SHGetFileInfo,SendMessageA,设置窗口标题_,

======窗口程序集1
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ _时钟1_周期事件
           |  |
           |  |------ _窗口句柄编辑框_获得焦点
           |  |
           |  |------ _窗口标题编辑框_获得焦点
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ _按钮2_被单击
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   SHGetFileInfo
           |  |
           |  |---[dll]------   SendMessageA
           |  |
           |  |---[dll]------   设置窗口标题_

调用的DLL命令:

.DLL命令 SHGetFileInfo, 整数型, , "SHGetFileInfo", 公开
    .参数 pszPath, 文本型
    .参数 dwFileAttributes, 整数型
    .参数 psfi, SHFILEINFO
    .参数 cbFileInfo, 整数型
    .参数 uFlags, 整数型

.DLL命令 SendMessageA, 整数型, "user32", "SendMessageA", , 调用一个窗口的窗口函数，将一条消息发给那个窗口。除非消息处理完毕，否则该函数不会返回。SendMessageBynum， ;    SendMessageByString是该函数的“类型security”声明形式　由具体的消息决定
    .参数 hwnd, 整数型, , 要接收消息的那个窗口的句柄
    .参数 wMsg, 整数型, , 消息的标识符
    .参数 wParam, 整数型, , 具体取决于消息
    .参数 lParam, 整数型, , 具体取决于消息;

.DLL命令 设置窗口标题_, 整数型, "user32", "SetWindowTextA"
    .参数 窗口句柄, 整数型
    .参数 窗口标题, 文本型