完美解决高分辨率DPI设置下易语言窗口错位变形问题

最恨VC

易语言的组件无法在设置了高DPI分辨率的系统下自适应显示
强行禁用DPI放大组件的话会导致显的格外的小，因为通常这些设置了高DPI的系统都是2K 4K分辨率的
现在有一种方法是获取DPI放大倍率，然后自己调整组件的位置大小和字体大小来适应高DPI
但是现在又有一个问题，因为组件非常多，有几百个，有没有一个简单的方法来设置呢？
我现在只在核心库找到了这么个命令，但是只能输出组件名，我该怎么做才能把这些组件名统一调整“左边”“顶边”“宽度”“高度”“字体”呢

  

组件句柄 ＝ 寻找组件 (_启动窗口, , , , )
计次循环首 (取找到组件数目 (组件句柄), i)
调试输出 (取组件名称 (取所找到组件 (组件句柄, i － 1)))
计次循环尾 ()
清除组件寻找句柄 (组件句柄)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> 组件句柄 ＝ 寻找组件 (_启动窗口, , , , )<br /> .计次循环首 (取找到组件数目 (组件句柄), i)<br />     调试输出 (取组件名称 (取所找到组件 (组件句柄, i － 1)))<br /> .计次循环尾 ()<br /> 清除组件寻找句柄 (组件句柄)

大司命

  

变量名	类 型	静态	数组	备 注
组件名称	文本型
编辑框	编辑框
按钮	按钮

组件句柄 ＝ 寻找组件 (_启动窗口, , , , )
计次循环首 (取找到组件数目 (组件句柄), i)
组件名称 ＝ 取组件名称 (取所找到组件 (组件句柄, i － 1))
判断 (组件名称 ＝ “编辑框”)
编辑框 ＝ 取所找到组件 (组件句柄, i － 1)
调试输出 (编辑框.左边, 编辑框.顶边)
判断 (组件名称 ＝ “按钮”)
按钮 ＝ 取所找到组件 (组件句柄, i － 1)
调试输出 (按钮.左边, 按钮.顶边)
' 以此类推~

计次循环尾 ()
清除组件寻找句柄 (组件句柄)

.局部变量 组件名称, 文本型<br /> .局部变量 编辑框, 编辑框<br /> .局部变量 按钮, 按钮<br /> 组件句柄 ＝ 寻找组件 (_启动窗口, , , , )<br /> .计次循环首 (取找到组件数目 (组件句柄), i)<br />     组件名称 ＝ 取组件名称 (取所找到组件 (组件句柄, i － 1))<br />     .判断开始 (组件名称 ＝ “编辑框”)<br />         编辑框 ＝ 取所找到组件 (组件句柄, i － 1)<br />         调试输出 (编辑框.左边, 编辑框.顶边)<br />     .判断 (组件名称 ＝ “按钮”)<br />         按钮 ＝ 取所找到组件 (组件句柄, i － 1)<br />         调试输出 (按钮.左边, 按钮.顶边)<br />     .默认<br />         ' 以此类推~<br />     .判断结束<br /> .计次循环尾 ()<br /> 清除组件寻找句柄 (组件句柄)

最恨VC

大司命 发表于 2019-2-21 16:54
[e=5]
.局部变量 组件名称, 文本型
.局部变量 编辑框, 编辑框

谢谢，稍微改了一下搞定了
组件名称 ＝ 取对象类型 (取所找到组件 (组件句柄, i － 1))