易语言仿编程助手光标捕获捕捉十字的写法

.版本 2
.支持库 eAPI

.程序集 窗口程序集_启动窗口

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

图片框.鼠标指针 ＝ #光标图
图片框.图片 ＝ #光标图

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

捕获鼠标 (图片框.取窗口句柄 ())
图片框.图片 ＝ { }

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

释放鼠标 ()
图片框.图片 ＝ #光标图

转载自：http://www.zhizhuowz.com/post-682.html