.版本 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.内容 ＝ 取窗口类名 (取鼠标所在窗口句柄 ())