以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]将动态生成的控件加入到动态生成的容器中时报错  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=177664)
--  作者：昱飞哥
--  发布时间：2022/5/30 13:55:00
--  [求助]将动态生成的控件加入到动态生成的容器中时报错
Dim f As WinForm.Form = e.Form
Dim dtl As DataTable = DataTables("Customer") 
\'生成容器控件(分割面板)spl
Dim spl As WinForm.SplitContainer = f.CreateControl("spl", ControlTypeEnum.SplitContainer) \'生成名为“spl”的SplitContainer
spl.Orientation = System.Windows.Forms.Orientation.Horizontal \'spl面板排列为水平排列
f.AddControl(spl)
spl.Dock = System.Windows.Forms.DockStyle.Fill \'停靠为Fill
spl.SplitterDistance = spl.Height * 3 / 4 \'spl的分隔条位于spl的3/4处

\'生成主表
Dim tbl As WinForm.Table = f.CreateTable("tbl", dtl.Caption, True) \'创建一个名为"tbl"的Table控件,并设置为副本


\'将主表放入分割面板spl的面板1
spl.Panel1.AddControl(tbl)     ‘这句代码报错“未将对象引用设置到对象的实例”
tbl.Dock = System.Windows.Forms.DockStyle.Fill \'停靠为Fill
tbl.Table.DataSource = dtl


[此贴子已经被作者于2022/5/30 13:55:28编辑过]
--  作者：有点蓝
--  发布时间：2022/5/30 15:03:00
--  
Dim tbl As WinForm.Table = f.CreateTable("tbl", dtl.Name, True)