- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 控件自动变化大小 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=75714)
-- 发布时间：2015/10/13 13:43:00
-- 控件自动变化大小
控件在窗口大小能否与窗口大小一起变化
-- 发布时间：2015/10/13 14:07:00
--
善用锚定和停靠。
自适应
Afterload事件
vars("width") = e.Form.width
vars("height") = e.Form.height
SizeChanged事件
For Each c As Winform.Control In e.Form.Controls
c.Left = c.Left * (e.Form.Width / vars("width"))
c.Top = c.Top * (e.Form.Height / vars("height"))
c.Width = c.Width * (e.Form.Width / vars("width"))
c.Height = c.Height * (e.Form.Height / vars("height"))
Next
msgbox(e.Form.Height / vars("height"))
vars("width") = e.Form.width
vars("height") = e.Form.height
-- 发布时间：2015/10/18 16:32:00
--
这个代码是设在项目全局事件还是窗口事件中呢？
-- 发布时间：2015/10/18 16:34:00
--
窗口事件
-- 发布时间：2015/10/18 16:47:00
--
窗口扩控件是可以了，控件中的字体大小能够按比例变化吗
-- 发布时间：2015/10/18 17:12:00
--
不行
-- 发布时间：2015/10/18 17:24:00
--
控件中的字体，比如按钮的标题
-- 发布时间：2015/10/18 17:25:00
--
不行，无法改变。
-- 发布时间：2016/1/25 12:18:00
--
我想让这个窗口自动适应电脑屏幕的大小变化，有两个问题：一是在添加适应大小的代码时，能够在A4纸上打印，添加后打印的纸张变了；二是把此软件发布后放在小电脑上没有办法自适应。看看是什么原因
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:审计说明.rar |
-- 发布时间：2016/1/26 0:59:00
--
参考
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=78838&skin=0