易语言取句柄类名源码

.版本 2
.支持库 eAPI
.支持库 spec

.程序集 窗口程序集_启动窗口
.程序集变量 l, 逻辑型

.子程序 __启动窗口_创建完毕

图片框1.图片 ＝ #光标
l ＝ 真

.子程序 _图片框1_鼠标左键被按下, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型

图片框1.图片 ＝ {  }
l ＝ 假
图片框1.鼠标指针 ＝ #光标
捕获鼠标 (图片框1.取窗口句柄 ())
时钟1.时钟周期 ＝ 50

.子程序 _图片框1_鼠标左键被放开, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型

l ＝ 真
调试输出 (“41”)
.如果真 (释放鼠标 ())
    图片框1.图片 ＝ #光标
    ' 图片框1.鼠标指针 ＝ 到字节集 (0)
    时钟1.时钟周期 ＝ 0
    调试输出 (“”)
.如果真结束


.子程序 _时钟1_周期事件

编辑框1.内容 ＝ 到文本 (取鼠标所在窗口句柄 ())
编辑框2.内容 ＝ 取窗口标题 (取鼠标所在窗口句柄 ())
编辑框3.内容 ＝ 取窗口类名 (取鼠标所在窗口句柄 ())

@1015441689