- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 关联窗口为何不能使用代码目录树? (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=9447)
-- 发布时间：2011/4/13 17:47:00
-- 关联窗口为何不能使用代码目录树?
在本表上能正确显示代码目录树。如何在关联表中也显示代码目录树。代码放在哪个事件里比较合适。
-- 发布时间：2011/4/13 17:59:00
--
可以的，做个简单例子来说明你的问题，我帮你看看怎么回事。
或者贴出你现在的代码看看。
[此贴子已经被作者于2011-4-13 18:28:07编辑过]
-- 发布时间：2011/4/13 18:43:00
--
就是在主表中使关联表显示目录树。
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:动态目录树列表.rar |
-- 发布时间：2011/4/13 18:44:00
--
开发版的例子文件
-- 发布时间：2011/4/13 19:35:00
--
If MainTable.Name = "客户" OrElse MainTable.Name = "d" Then
Dim tb As New DropTreeBuilder
tb.SourceTable = DataTables("行政区域") \'指定目录树表
tb.TreeCols = "省|县市" \'指定用于生成目录树的列
tb.SourceCols = "省|县市|区号|邮编" \'指定数据来源列
tb.ReceiveCols = "省|县市|区号|邮编" \'指定数据接收列
Tables("客户").Cols("省").DropTree = tb.Build()
Tables("d.客户").Cols("省").DropTree = tb.Build()
End If