Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]怎样往窗口中的SplitContainer分区中加控件


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

主题：[求助]怎样往窗口中的SplitContainer分区中加控件
帅哥哟，离线，有人找我吗？
whyfoxtable
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：134 积分：1047 威望：0 精华：0 注册：2014/11/24 11:07:00 		[求助]怎样往窗口中的SplitContainer分区中加控件  发帖心情 Post By：2014/12/13 18:54:00 [只看该作者]

前提：

1.有一个窗口：窗口1

2.窗口1中有一个控件SplitContainer1

 

目标：

往SplitContainer1的第2个分区中加入一个控件Button1

 

已经有的代码为（有错，仅用来表达意思）

CreateContrl("Button1",Button)

Button1.Parent = SplitContainer1.panel2

 

如何修改以上代码？
 回到顶部
帅哥哟，离线，有人找我吗？
y2287958
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：狐神 帖子：4761 积分：34613 威望：0 精华：0 注册：2008/8/31 22:44:00 		  发帖心情 Post By：2014/12/13 19:08:00 [只看该作者]

Dim bt As WinForm.Button
bt = e.Form.CreateControl("Button1", ControlTypeEnum.Button)
bt.Text = "2分区按钮"
Dim sp As WinForm.SplitContainer = e.Form.Controls("SplitContainer1")
sp.Panel2.AddControl(bt)
 回到顶部
帅哥哟，离线，有人找我吗？
czy
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章 三级勋章 二级勋章
等级：超级版主 帖子：6318 积分：33963 威望：0 精华：10 注册：2008/8/31 20:56:00 		  发帖心情 Post By：2014/12/13 19:08:00 [只看该作者]

Dim but As WinForm.Button
but = e.Form.CreateControl("按钮", ControlTypeEnum.Button)
but.text = "新增按钮"
but.Left = 100
but.Top = 100
e.Form.Controls("SplitContainer1").Panel2.AddControl(but)
 回到顶部
帅哥哟，离线，有人找我吗？
whyfoxtable
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：134 积分：1047 威望：0 精华：0 注册：2014/11/24 11:07:00 		[分享][我在试验，随后报告。先感谢！  发帖心情 Post By：2014/12/13 19:36:00 [只看该作者]

小白在行动，两位大师请稍等.....

 

试验成功。再次感谢！

 

另，怎么才能让其“Fill ” 方式放在 SplitControl1.panel2 上面？ 我没看到相关属性，但在窗口设计窗口“位置一组的‘停靠’选项可以设为‘Fill' .

[此贴子已经被作者于2014-12-13 19:50:49编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
czy
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章 三级勋章 二级勋章
等级：超级版主 帖子：6318 积分：33963 威望：0 精华：10 注册：2008/8/31 20:56:00 		  发帖心情 Post By：2014/12/13 20:10:00 [只看该作者]

是这个意思吗？

 

Dim but As WinForm.Button
but = e.Form.CreateControl("按钮", ControlTypeEnum.Button)
but.text = "新增按钮"
but.Dock = 5
e.Form.Controls("SplitContainer1").Panel2.AddControl(but)
 回到顶部
帅哥哟，离线，有人找我吗？
whyfoxtable
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：134 积分：1047 威望：0 精华：0 注册：2014/11/24 11:07:00 		[分享]but.Dock = 5，我试验一下。  发帖心情 Post By：2014/12/13 20:25:00 [只看该作者]

成功了，感谢！ 我在帮助文件和窗口设计（用精灵）也没找到，哪里找到的啊？我一直在找这个，一个下午都没找到。再次感谢。。。。。。
[此贴子已经被作者于2014-12-13 20:28:51编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
czy
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章 三级勋章 二级勋章
等级：超级版主 帖子：6318 积分：33963 威望：0 精华：10 注册：2008/8/31 20:56:00 		  发帖心情 Post By：2014/12/13 20:30:00 [只看该作者]

http://www.foxtable.com/help/topics/1939.htm

 

官方的写法是：

but.Dock = Windows.Forms.DockStyle.Fill
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04688 秒, 4 次数据查询