程序窗口缩放组件自适应大小

易语言 2020-07-21 00:08:18

程序窗口缩放组件自适应大小

.计次循环首 (A, N)
SetWindowPos (_ChildHwnd [N], 0, 宽度 × _Proportion [N].Left, 高度 × _Proportion [N].Top, _Proportion [N].width × 宽度, _Proportion [N].height × 高度, 0)
.计次循环尾 ()
标签1.标题 = “高度:” + 到文本 (高度) + “ 宽度:” + 到文本 (宽度)

.数据类型 Proportion, 公开, 矩形与用户区要素比例
.成员 Left, 双精度小数型, , , 左边
.成员 Top, 双精度小数型, , , 顶边
.成员 width, 双精度小数型, , , 宽度
.成员 height, 双精度小数型, , , 高度