asd708820274 发表于 2021-2-23 20:46 感谢分享。 |
易如意中文编程学习交流论坛有你更精彩~ |
易如意中文编程学习交流论坛有你更精彩~ |
asd708820274 发表于 2021-2-23 20:46 谢谢您... |
66666666666666666 |
变量 是否触发拖动 为 逻辑型 变量 递增宽度 为 整数型 事件 按钮1.被点击() 是否触发拖动=真 结束 事件 事件 按钮1.被移动(起点横坐标 为 整数型,起点纵坐标 为 整数型,终点横坐标 为 整数型,终点纵坐标 为 整数型) 如果 是否触发拖动=真 则 按钮1.移动(终点横坐标,终点纵坐标,按钮1.宽度,按钮1.高度) 递增宽度=按钮1.左边-编辑框1.左边+编辑框1.宽度 编辑框.移动(编辑框1.左边,编辑框1.顶边,编辑框1.宽度+递增宽度,编辑框1.顶边) 结束 如果 结束 事件 事件 按钮1.被弹起(横坐标 为 整数型,纵坐标 为 整数型) 是否触发拖动=假 结束 事件 |