目标是：创建动态编辑框，任意移动，不受到二次创建影响

慧博天远

目标是：创建动态编辑框，任意移动，不受到二次创建影响

目标是：创建动态编辑框，任意移动，不受到二次创建影响 ，代码如下：

变量 组件集合 为 集合
变量 组件 为 编辑框
变量 计次 为 整数型
变量 移动 为 整数型
变量 终点横坐标 为 整数型
变量 起点横坐标 为 整数型
变量 终点纵坐标 为 整数型
变量 起点纵坐标 为 整数型
事件 主窗口.创建完毕()
组件集合 = 创建 集合
结束 事件
事件 按钮_创建.被单击()
组件 = 创建 编辑框 位于 主窗口
可视 = 真
组件集合.加入项目(组件)
变量循环首 计次 = 0 至 组件集合.取项目总数()-1
  组件 = 组件集合.取项目(计次)
  组件.左边 = 按钮_创建.左边
  组件.顶边 = 按钮_创建.顶边' + 按钮_创建.高度 * (计次+1)
  组件.顶边 = 按钮_创建.高度
  组件.宽度 = 按钮_创建.宽度
  组件.高度 = 按钮_创建.高度
  组件.对齐方式 = 靠中居中
  组件.字体大小 = 9
  组件.可视 = 真
  组件.置组件索引(计次) '设置按钮的ID
  组件.绑定事件(事件监听器1) '绑定事件
  组件.移动(组件.左边 + 终点横坐标 - 起点横坐标,组件.顶边 + 终点纵坐标 - 起点纵坐标,组件.宽度,组件.高度)  
'  组件.标题 = "" & 计次
  组件.背景图片 = "anniu6.png"
变量循环尾
结束 事件
事件 按钮_创建.被移动(起点横坐标 为 整数型,起点纵坐标 为 整数型,终点横坐标 为 整数型,终点纵坐标 为 整数型)
组件.移动(组件.左边 + 终点横坐标 - 起点横坐标,组件.顶边 + 终点纵坐标 - 起点纵坐标,组件.宽度,组件.高度)
结束 事件

q937315836

牛批！！！！

易8643501

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

18754878785

这种方式能不能做出一个带编辑功能的列表框

易8643501

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

ok378

谢谢楼主分享

ok378

谢谢分享