编辑框或者面板，要怎样才能按着拉大，如下图..

rianwg

编辑框或者面板，要怎样才能按着拉大，如下图..

asd708820274

变量 是否触发拖动 为 逻辑型
变量 递增宽度 为 整数型
事件 按钮1.被点击（）
     是否触发拖动=真
结束 事件
事件 按钮1.被移动(起点横坐标 为 整数型,起点纵坐标 为 整数型,终点横坐标 为 整数型,终点纵坐标 为 整数型)
        如果 是否触发拖动=真 则
          按钮1.移动（终点横坐标，终点纵坐标，按钮1.宽度，按钮1.高度）
          递增宽度=按钮1.左边-编辑框1.左边+编辑框1.宽度
          编辑框.移动（编辑框1.左边，编辑框1.顶边，编辑框1.宽度+递增宽度，编辑框1.顶边）
        结束 如果
结束 事件
事件 按钮1.被弹起(横坐标 为 整数型,纵坐标 为 整数型)
         是否触发拖动=假
结束 事件

gaoao330

66666666666666666

rianwg

asd708820274 发表于 2021-2-23 20:46
变量 是否触发拖动 为 逻辑型
变量 递增宽度 为 整数型
事件 按钮1.被点击（）

谢谢您...

wrazjd

易如意中文编程学习交流论坛有你更精彩~

xinshouwanjia

易如意中文编程学习交流论坛有你更精彩~

HH6888888

asd708820274 发表于 2021-2-23 20:46
变量 是否触发拖动 为 逻辑型
变量 递增宽度 为 整数型
事件 按钮1.被点击（）

感谢分享。