.版本 2
.程序集 窗口程序集1
.程序集变量 光标取句柄, 光标取句柄
.子程序 _图片框1_鼠标左键被按下, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型
光标取句柄.注册到图片按下 (图片框1, 时钟1)
.子程序 _时钟1_周期事件
编辑框1.内容 = 光标取句柄.注册到周期事件 (图片框1)
.子程序 _图片框1_鼠标左键被放开, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型
光标取句柄.注册到图片放开 (时钟1, 图片框1)
.子程序 __启动窗口_创建完毕
光标取句柄.注册图片框数据 (图片框1, #光标)
.子程序 _编辑框1_内容被改变