组件在程序窗口里面随意移动

易语言 2020-08-17 18:07:31

组件在程序窗口里面随意移动

.计次循环首 (9, LL)
动作画板 = 取标记组件 (LL)
动作画板.移动 (取随机数 (1, _启动窗口.取用户区宽度 () - 20), 取随机数 (1, _启动窗口.取用户区高度 () - 20), , )
.计次循环尾 ()

执行标签 = 取事件组件 ()
动作画板 = 取标记组件 (到数值 (执行标签.标记) - 100)
弹出菜单 (右键菜单, , )