- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 窗口加载时，动态建立关联出错-附上示例项目 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=33343)
-- 发布时间：2013/5/16 10:33:00
-- 窗口加载时，动态建立关联出错-附上示例项目
窗口加载时，动态建立关联出错：
第一次打开窗口时没提示，第二次打开窗口时有此提示：
此主题相关图片如下：qq截图20130516102141.jpg
[此贴子已经被作者于2013-5-16 15:12:53编辑过]
-- 发布时间：2013/5/16 10:35:00
--
你是不是重复建立关联了,建立关联的时候先判断一下该关联是否存在.
-- 发布时间：2013/5/16 11:06:00
--
好的，我试下
-- 发布时间：2013/5/16 11:44:00
--
加了判断，还是同样提示：
\'动态关联
If Relations.Contains("关联1") = False Then
Relations.Add("关联1",DataTables("箱型").DataCols("箱型id"),dt.DataCols("箱型id"),RelationPathEnum.None)
dt.DataCols("箱型编码").Expression = "Parent(关联1).箱型编码"
dt.DataCols("箱型").Expression = "Parent(关联1).箱型"
End If
If Relations.Contains("关联2") = False Then
Relations.Add("关联2",DataTables("楞别").DataCols("楞别id"),DataTables("纸质").DataCols("楞别id"),RelationPathEnum.None)
DataTables("纸质").DataCols("楞别").Expression = "Parent(关联2).楞别"
End If
If Relations.Contains("关联3") = False Then
Relations.Add("关联3",DataTables("纸质").DataCols("纸质id"),dt.DataCols("纸质id"),RelationPathEnum.None)
dt.DataCols("楞别").Expression = "Parent(关联3).楞别"
dt.DataCols("纸质").Expression = "Parent(关联3).纸质"
End If
If Relations.Contains("关联4") = False Then
Relations.Add("关联4",DataTables("纸质查询").DataCols("纸质id"),dt.DataCols("纸质id"),RelationPathEnum.None) \'纸质查询是一查询表
dt.DataCols("调整纸质").Expression = "Parent(关联4).纸质"
End If
\'动态关联
-- 发布时间：2013/5/16 11:45:00
--
例子发出来看看
-- 发布时间：2013/5/16 11:47:00
--
我做个例子吧
-- 发布时间：2013/5/16 15:12:00
--
例子：
-- 发布时间：2013/5/16 15:27:00
--
得按着CTRL找开项目了
-- 发布时间：2013/5/16 15:32:00
--
补充：
窗口打开后，共建立4个关联：关联1,关联2,关联3,关联4,
在窗口中测试删除关联时，
第1次点删除按钮时，只删除了：关联1，关联3
第2次点删除按钮时，只删除了：关联2
第3次点删除按钮时，只删除了：关联4