|
楼主 |
发表于 2024-4-15 02:12:26
|
显示全部楼层
内蒙古自治区乌海市
.版本 2
.子程序 绘制界面
.局部变量 按钮标题, 文本型, , "22"
.局部变量 标, 整数型
.局部变量 行, 整数型
.局部变量 列, 整数型
按钮标题 = { “←”, “归零”, “1”, “2”, “3”, “+”, “√”, “4”, “5”, “6”, “-”, “x(^y)”, “7”, “8”, “9”, “×”, “≈”, “0”, “.”, “!”, “÷”, “=” }
.计次循环首 (5, 行)
.计次循环首 (5, 列)
处理事件 ()
.如果 (行 = 1 且 列 < 4)
' 空出前面编辑框的位置
.否则
标 = 标 + 1
复制窗口组件 (按钮_底层, 按钮组件)
按钮组件.移动 (按钮组件.左边 + 按钮组件.宽度 × (列 - 1) + (列 - 1) × 14, 按钮组件.顶边 + 按钮组件.高度 × (行 - 1) + (行 - 1) × 14, , )
按钮组件.可视 = 真
按钮组件.标记 = 到文本 (标)
按钮组件.标题 = 按钮标题 [标]
.如果结束
.计次循环尾 ()
.计次循环尾 ()
怎么修改成复制画板呢? |
|