Foxtable(狐表)用户栏目专家坐堂 → 问个滚动条的问题


  共有2596人关注过本帖树形打印复制链接

主题:问个滚动条的问题

帅哥哟,离线,有人找我吗?
blackzhu
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:狐仙 帖子:9879 积分:57652 威望:0 精华:15 注册:2008/9/1 9:45:00
问个滚动条的问题  发帖心情 Post By:2018/6/28 15:42:00 [只看该作者]

  因为显示屏的分辨率问题,我需要碰到分辨率低的显示器,自动开启窗口的滚动条,这个应该怎么做比较好?

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/6/28 16:06:00 [只看该作者]

你直接把窗口的属性->自动滚动,设置成true,不就好了?

 回到顶部
帅哥哟,离线,有人找我吗?
blackzhu
  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:狐仙 帖子:9879 积分:57652 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By:2018/6/28 16:12:00 [只看该作者]

问题是  不是所有的显示屏这样,有些事正常的! 


 If SysInfo.ScreenWidth < 900 Then
            e.Form.AutoScroll = True
        End If

这样怎么没有出来?
[此贴子已经被作者于2018/6/28 16:27:54编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/6/28 16:40:00 [只看该作者]

如果你窗口宽高是1600*1200,当你在1024*768的屏幕打开的时候,你应该修改的是窗口的宽高,如果内容无法全部显示就自动出现滚动条了。


 回到顶部
帅哥哟,离线,有人找我吗?
blackzhu
  5楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:狐仙 帖子:9879 积分:57652 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By:2018/6/28 16:45:00 [只看该作者]

我想想

 回到顶部
帅哥哟,离线,有人找我吗?
blackzhu
  6楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:狐仙 帖子:9879 积分:57652 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By:2018/6/28 16:59:00 [只看该作者]

 Dim w As Integer = SysInfo.ScreenWidth
        MessageBox.Show(w)
        Dim h As Integer = SysInfo.ScreenHeight
        If w < e.Form.BaseForm.Width AndAlso h < e.Form.BaseForm.Height Then
            e.Form.BaseForm.Width = w
            e.Form.BaseForm.Height = h
            e.Form.BaseForm.AutoScroll = True
        End If

这个由什么问题,我的分辨率是 1360*768  我的窗口高度是1504 * 879


另外我是嵌入到页签的做法
[此贴子已经被作者于2018/6/28 17:00:59编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/6/28 17:49:00 [只看该作者]

1、你6楼的AutoScroll代码执行了没有?

 

2、做个例子发上来测试。


 回到顶部
帅哥哟,离线,有人找我吗?
blackzhu
  8楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:狐仙 帖子:9879 积分:57652 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By:2018/6/28 18:03:00 [只看该作者]

搞定了,需要扩展尺寸才行

 回到顶部