如何使窗体控件按屏幕分辨率按比例缩放

king5498 · 发表于 2011-9-12 11:26:12

我想在各种不同尺寸的屏幕上显示一个满屏桌面,里面的控件要怎么做才能按比例缩放,位置大小不变形

金哥专用 · 发表于 2011-9-12 11:53:13

取屏幕宽度（）
取屏幕高度（）

大头佛 · 发表于 2011-9-12 11:54:23

本帖最后由大头佛于 2011-9-12 11:56 编辑

[e]
.版本 2
.支持库 spec
.子程序 __启动窗口_创建完毕
子程序1 ()
.子程序子程序1
.局部变量横比例, 小数型
.局部变量竖比例, 小数型
.局部变量句柄数组, 整数型, , "0"
.局部变量临时, 整数型
.局部变量原来横
.局部变量原来竖
.局部变量临时高度
.局部变量临时宽度
原来横＝ 1024  ' 写你设计时候的窗口宽度
原来竖＝ 800  ' 写你设计时候的窗口高度
横比例＝取屏幕宽度 () ÷ 原来横
竖比例＝取屏幕高度 () ÷ 原来竖
窗口_枚举所有子窗口 (取窗口句柄 (), 句柄数组)  ' “这里添你的父窗口句柄”
调试输出 (句柄数组)
.计次循环首 (取数组成员数 (句柄数组), 临时)
窗口_取控件大小 (句柄数组 [临时], 临时宽度, 临时高度)
窗口_置位置和大小 (句柄数组 [临时], , , 临时高度 × 横比例, 临时宽度 × 竖比例)
.计次循环尾 ()
[/e]
稍微测试了一下，如果有bug 提出来！

大头佛 · 发表于 2011-9-12 11:57:28

本帖最后由大头佛于 2011-9-12 11:59 编辑

奇怪了！！！{:soso_e134:}

神神神神经病 · 发表于 2011-9-12 12:36:49

{:3_244:}有什么用吗？

dongj13 · 发表于 2011-9-12 13:00:22

就怕组件之间的距离不成比例得变形啊，越变越难看。

king5498 · 发表于 2011-9-12 13:24:22

有点明白了,研究研究谢谢

雅氏◆¨小轩 · 发表于 2011-9-14 03:00:22

{:3_234:}学习中！

冰点吸血王 · 发表于 2011-10-9 13:50:16

取用户区宽度 ()
取用户区高度 ()//这个来控制窗体内控件，不必考虑窗口的边框宽度高度
取屏幕宽度（）
取屏幕高度（）//这个直接是屏幕的，设置窗体

︶ㄣFrankㄜ︵ · 发表于 2012-3-24 18:25:02

看看

		自动登录	找回密码
密码			注册

[易语言] 如何使窗体控件按屏幕分辨率按比例缩放

浏览过的版块