Foxtable(狐表)用户栏目专家坐堂 → 分区面板的宽度设置(已解决)


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

主题:分区面板的宽度设置(已解决)

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


加好友 发短信
等级:小狐 帖子:365 积分:2693 威望:0 精华:1 注册:2011/11/25 7:55:00
分区面板的宽度设置(已解决)  发帖心情 Post By:2012/1/11 11:16:00 [只看该作者]

分区面板是垂直分割,如何通过代码设置panel1的宽度

dim spc as winform.SplitContainer

spc.SplitterDistance = 200

只能这样设置吗

[此贴子已经被作者于2012-1-11 14:45:50编辑过]

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


加好友 发短信
等级:管理员 帖子:47477 积分:251256 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2012/1/11 11:19:00 [只看该作者]

是的

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


加好友 发短信
等级:小狐 帖子:365 积分:2693 威望:0 精华:1 注册:2011/11/25 7:55:00
  发帖心情 Post By:2012/1/11 11:43:00 [只看该作者]

大小有限制吧


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


加好友 发短信
等级:小狐 帖子:365 积分:2693 威望:0 精华:1 注册:2011/11/25 7:55:00
  发帖心情 Post By:2012/1/11 11:58:00 [只看该作者]

spc.SplitterDistance = 600
spc.FixedPanel = 1

窗口宽度800,控件停靠属性为fill,为何panel1的宽度没达到600呢


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20120111120235.jpg
图片点击可在新窗口打开查看

 

想达到两个分隔控件分别在窗口正中分割的目的

[此贴子已经被作者于2012-1-11 12:03:38编辑过]

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


加好友 发短信
等级:管理员 帖子:47477 积分:251256 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2012/1/11 12:06:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目257.rar


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


加好友 发短信
等级:小狐 帖子:365 积分:2693 威望:0 精华:1 注册:2011/11/25 7:55:00
  发帖心情 Post By:2012/1/11 12:19:00 [只看该作者]

老大,动态添加的达不到这个效果啊

Dim spc As WinForm.SplitContainer
spc = forms("窗口1").CreateControl("spc1",ControlTypeEnum.SplitContainer)
spc.SplitterDistance = 600
spc.FixedPanel = 1
spc.Dock = Windows.Forms.DockStyle.fill
forms("窗口1").AddControl(spc)

[此贴子已经被作者于2012-1-11 12:19:47编辑过]

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


加好友 发短信
等级:管理员 帖子:47477 积分:251256 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2012/1/11 14:09:00 [只看该作者]

先加入窗口,再设置:

 

Dim spc As WinForm.SplitContainer
spc = forms("窗口1").CreateControl("spc1",ControlTypeEnum.SplitContainer)
spc.FixedPanel = 1
spc.Dock = Windows.Forms.DockStyle.fill
forms("窗口1").AddControl(spc)

spc.SplitterDistance = 600


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


加好友 发短信
等级:小狐 帖子:365 积分:2693 威望:0 精华:1 注册:2011/11/25 7:55:00
  发帖心情 Post By:2012/1/11 14:46:00 [只看该作者]

OK,已经搞定,谢谢

 回到顶部