Foxtable(狐表)用户栏目专家坐堂 → [求助]用代码实现的SplitContainer中,其他控件为什么看不见


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

主题:[求助]用代码实现的SplitContainer中,其他控件为什么看不见

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


加好友 发短信
等级:童狐 帖子:252 积分:2193 威望:0 精华:0 注册:2011/6/28 16:50:00
[求助]用代码实现的SplitContainer中,其他控件为什么看不见  发帖心情 Post By:2011/7/20 14:53:00 [显示全部帖子]

想用代码创建SplitContainer,并在panel1,panel2中分别放其他的控件,代码执行后,添加进去的控件看不见,不知为什么?

 

Dim split As WinForm.SplitContainer
Dim pnl As WinForm.Panel
Dim tbl As WinForm.Table
Dim but As WinForm.Button

 

With e.form
' 创建split分隔
  split = e.Form.CreateControl("split1", ControlTypeEnum.splitcontainer)
  split.Dock = Windows.Forms.DockStyle.Fill
  split.Orientation = windows.Forms.Orientation.horizontal
  split.splitterdistance =900
  split.splitterwidth = 4
  e.form.addcontrol(split)

'创建panel工具栏
  pnl = e.Form.CreateControl("pnl1", ControlTypeEnum.panel)
  pnl.SetBounds(200, 0, 400,40)
  pnl.Topmost = True
  pnl.backcolor= Color.FromARGB(187,0,10,203)
  split.panel1.AddControl(pnl)

'创建按钮
  but = e.Form.CreateControl("butadd", ControlTypeEnum.button)
  split.Panel1.AddControl(but)

End With


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


加好友 发短信
等级:童狐 帖子:252 积分:2193 威望:0 精华:0 注册:2011/6/28 16:50:00
  发帖心情 Post By:2011/7/20 14:55:00 [显示全部帖子]

并且,  split.splitterdistance =900好像不起作用,初始分隔条处在100个像素的位置。?

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


加好友 发短信
等级:童狐 帖子:252 积分:2193 威望:0 精华:0 注册:2011/6/28 16:50:00
  发帖心情 Post By:2011/7/21 9:29:00 [显示全部帖子]

上述问题存在普遍性,即用代码动态创建一个容器类控件,再用代码动态创建其他控件并将这些控件添加到容器控件,就出现容器内的控件s不可见。非常郁闷


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


加好友 发短信
等级:童狐 帖子:252 积分:2193 威望:0 精华:0 注册:2011/6/28 16:50:00
  发帖心情 Post By:2011/7/21 12:48:00 [显示全部帖子]

但是,狐狸爸爸的做法,是将button添加到了panel1中啦,而原本是要添加到panel1中的panel里的。

 回到顶部