以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  请教如何动态添加窗口菜单到SplitContainer2下方?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=116627)

--  作者:zhy400137
--  发布时间:2018/3/28 14:18:00
--  请教如何动态添加窗口菜单到SplitContainer2下方?
Dim Strip As WinForm.Strip
Strip = e.Form.Strips.Add("工具栏1", StripTypeEnum.ToolBar)
e.Form.Strips("工具栏1").basecontrol.Dock = 2

以上是整个窗体的,要放在SplitContainer2下方,要如何处理,谢谢~

--  作者:有点甜
--  发布时间:2018/3/28 14:23:00
--  

Dim Strip As WinForm.Strip
Strip = e.Form.Strips.Add("工具栏1", StripTypeEnum.ToolBar)
e.Form.Strips("工具栏1").basecontrol.Dock = 2
Dim sp = e.Form.Controls("SplitContainer2")
sp.panel2.basecontrol.controls.add(strip.basecontrol)


--  作者:zhy400137
--  发布时间:2018/3/28 14:36:00
--  
谢谢,再请教
Dim Strip As WinForm.Strip
Strip = e.Form.Strips.Add("工具栏1", StripTypeEnum.ToolBar)
Strip.Items.Add("PageNum", "页码", "", StripItemTypeEnum.Textbox)
e.Form.Strips("工具栏1").basecontrol.Dock = 2
Dim sp = e.Form.Controls("SplitContainer2")
sp.panel2.basecontrol.controls.add(strip.basecontrol)
动态创建后,我自己添加了一个文本框,我如何设置它的值,并获取它值变化的事件呢?

--  作者:zhy400137
--  发布时间:2018/3/28 14:49:00
--  
这个明白了,我可以做另一个按钮去取值,暂时不用解答了,谢谢
--  作者:有点甜
--  发布时间:2018/3/28 15:27:00
--  
以下是引用zhy400137在2018/3/28 14:36:00的发言:
 
动态创建后,我自己添加了一个文本框,我如何设置它的值,并获取它值变化的事件呢?

 

可以去编写窗口click事件、菜单click事件,在里面写代码即可

 

http://www.foxtable.com/webhelp/scr/1920.htm