以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]TreeView 受窗体影响，如何增加滚动条  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=98330)
--  作者：2900819580
--  发布时间：2017/3/28 10:51:00
--  [求助]TreeView 受窗体影响，如何增加滚动条
TreeView 受窗体影响，如何增加滚动条
--  作者：有点色
--  发布时间：2017/3/28 12:18:00
--  
treeView不是会自动增加滚动条的吗？
--  作者：2900819580
--  发布时间：2017/3/29 15:02:00
--  
我的意思是：在小屏的显示器上，无法完全浏览所有信息时，它不会自动增加，在我自己显示器上没有问题。
--  作者：有点色
--  发布时间：2017/3/29 15:15:00
--  

 你窗口设计有问题，如果你窗口设置过大，而你屏幕过小，肯定不会完整显示的啊。

 

 具体例子说明。
--  作者：2900819580
--  发布时间：2017/3/29 15:37:00
--  


图片点击可在新窗口打开查看此主题相关图片如下：1.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下：c.png
图片点击可在新窗口打开查看

老师，两个界面如上图，

SplitContainer 控件都是停靠Fill
--  作者：有点色
--  发布时间：2017/3/29 15:48:00
--  

 你窗口设置成那么大，不能完全显示是正常的情况。你各个容器里面，滚动设置要设置成自动滚动。

 

 你要根据小屏幕的窗口去设计才对。

 

--  作者：2900819580
--  发布时间：2017/3/29 16:02: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


[此贴子已经被作者于2017/3/29 16:03:31编辑过]
--  作者：有点色
--  发布时间：2017/3/29 16:20:00
--  

 你设计窗口的时候，布局有问题。要把窗口大小设计成 1024*768，结合滚动条设计。