窗口程序集名 | 保 留 | 保 留 | 备 注 | 窗口程序集_启动窗口 | | | | 变量名 | 类 型 | 数组 | 备 注 | 鼠标判断 | 逻辑型 | | 句柄1 | 整数型 | | 时钟周期 | 整数型 | |
|
_图片框_句柄1_鼠标左键被按下 | 逻辑型 | | |
横向位置 | 整数型 | | | | 纵向位置 | 整数型 | | | | 功能键状态 | 整数型 | | | |
鼠标判断 = 真 图片框_句柄1.鼠标指针 = #鼠标指针十字 图片框_句柄1.图片 = { }处理事件 ()捕获鼠标 (图片框_句柄1. 取窗口句柄 ()) |
_图片框_句柄1_鼠标左键被放开 | 逻辑型 | | |
横向位置 | 整数型 | | | | 纵向位置 | 整数型 | | | | 功能键状态 | 整数型 | | | | 如果真 (鼠标判断 )外部句柄 = 取鼠标所在窗口句柄 ()图片框_句柄1.鼠标指针 = 到字节集 (0 )图片框_句柄1.图片 = #鼠标指针十字 鼠标判断 = 假 释放鼠标 ()编辑框_窗口句柄号1.内容 = 到文本 (外部句柄 )句柄1 = 外部句柄时钟抓取.时钟周期 = 1000 调试输出 (“时钟执行”)编辑框_内容.内容 = 取窗口标题 (句柄1 )如果 (编辑框_内容.内容 = “”)编辑框1.内容 = “”编辑框2.内容 = “”_按钮1_被单击 ()变量名 | 类 型 | 静态 | 数组 | 备 注 | 字符数 | 整数型 | | | 随机数 | 整数型 | | | 取出字符 | 文本型 | | | 字符数1 | 整数型 | | | 随机数1 | 整数型 | | | 取出字符1 | 文本型 | | | 调试输出 (“未开始执行”)如果真 (编辑框_内容.内容 = “”)返回 ()调试输出 (“执行了”)字符数 = 取文本长度 (编辑框_内容.内容 )随机数 = 取随机数 (1, 字符数 )取出字符 = 取文本中间 (编辑框_内容.内容, 随机数, 4 )编辑框1.内容 = 取出字符 字符数1 = 取文本长度 (编辑框_内容.内容 )随机数1 = 取随机数 (1, 字符数1 )取出字符1 = 取文本中间 (编辑框_内容.内容, 随机数1, 4 )编辑框2.内容 = 取出字符1 编辑框_内容.内容 = “”句柄1 = 0
是你的问题想复杂了,你的核心就是如何取一次把句柄清空而已
|