易语言 怎样模拟鼠标左键拖选的功能 选中多个图标 或选中一段文字
发布网友
发布时间:2022-04-28 23:17
我来回答
共2个回答
热心网友
时间:2023-09-22 10:22
.版本 2
.程序集 窗口程序集_启动窗口
.子程序 __启动窗口_创建完毕
次数 = 0
.子程序 __启动窗口_鼠标左键被按下, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型
mousex = 横向位置
mousey = 纵向位置
点击 = 真
次数 = 次数 + 1
.子程序 __启动窗口_鼠标位置被移动, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型
moux = 横向位置
mouy = 纵向位置
.子程序 _时钟1_周期事件
.如果真 (点击)
外形框1.可视 = 真
外形框1.左边 = mousex
外形框1.顶边 = mousey
.如果 (moux < mousex)
外形框1.左边 = moux
外形框1.宽度 = mousex - moux
.否则
外形框1.宽度 = moux - mousex
.如果结束
.如果 (mouy < mousey)
外形框1.顶边 = mouy
外形框1.高度 = mousey - mouy
.否则
外形框1.高度 = mouy - mousey
.如果结束
热心网友
时间:2023-09-22 10:22
在这下载