以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  新建底层窗口  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=80994)

--  作者:cyl123
--  发布时间:2016/2/16 8:40:00
--  新建底层窗口
新建底层窗口  System.Windows.Forms.Form ,如何作为basemainform的模式窗口、独立窗口、停靠窗口等?
--  作者:Hyphen
--  发布时间:2016/2/16 8:57:00
--  
Dim f As New System.Windows.Forms.Form()
f.Width = 500
f.Height = 500
\'f.ShowDialog(basemainform) \'作为模式窗口
f.Show(basemainform) \' 作为独立窗口

停靠窗口要用到C1的holder,比较麻烦,可以在狐表创建一个停靠窗口,把底层窗口放进去

--  作者:大红袍
--  发布时间:2016/2/16 9:13:00
--  

 停靠窗口这个的话,可以直接把独立窗口剪切到你的停靠窗口里去。

 

 类似

 

Dim tab As WinForm.TabControl = e.Form.Controls("TabControl1")
Dim Name As String = "窗口2"

tab.TabPages.Add(name,name)
Dim pb = tab.BaseControl
Forms(Name).OPEN(-1000,-1500)
Forms(Name).BaseForm.TopLevel = False
Forms(Name).BaseForm.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
Forms(Name).BaseForm.Dock = System.Windows.Forms.DockStyle.Fill
PB.TabPages(name).Controls.Clear
PB.TabPages(name).Controls.add(Forms(Name).BaseForm)
tab.SelectedPage = tab.TabPages(name)

 


--  作者:cyl123
--  发布时间:2016/2/16 11:30:00
--  
Dim f As New System.Windows.Forms.Form()
f.Width = 500
f.Height = 500
f.Show(basemainform) \' 作为独立窗口
f与 basemainform 的关系是什么,父窗口与子窗口还是其他?

是否有类似下面这样的关系
forms(“窗口1”).baseform.addownedform(f2)  \'底层窗口
forms(“窗口1”).Owner 是f2

--  作者:大红袍
--  发布时间:2016/2/16 11:34:00
--  

和basemainform没有任何关系的,如果要做mdi,你可以设置父子关系

 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=16371&skin=0