主题：关于窗口表中的下拉树的问题

我在  明细 表中设置prepareedit事件，给商品列建立下拉树

Select Case e.col.name
    Case "商品"
        If not Tables("明细").Cols("商品").DroppedDown Then
            Dim tb As New DropTreeBuilder
            tb.SourceTable = DataTables("库存") '指定目录树表
            tb.TreeCols = "商品_中类|商品_名称" '指定用于生成目录树的列
            tb.TreeFilter = "[上架] = True and [店名] = '" & _shopname & "'"
            tb.SourceCols = "商品_条码|价格_单价|价格_提成|价格_返利"
            tb.ReceiveCols = "商品|单价|提成|返利" '指定数据接收列
             Tables("明细").Cols("商品").DropTree = tb.Build()           
        End If
End Select

 

在明细表中 下拉树建立 没有问题

但当我在窗体中 table控件绑定 销售.明细表，normal型正本 表。应该是共享所有事件代码的

 

但在窗口中该表商品列不能产生下拉框，这是怎么回事呢？

我做了一个简单的例子，帮我看看

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目3.table

正本表和主表是一摸一样的 没有理由的。再查查类型。

我的窗口中用的是 库存.明细 表 如何给这个关联表的 商品名 列建立下拉树呢？

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目3.table

这个请高手帮我看看

 把 Tables("明细").Cols("商品名").DropTree = tb.Build()

 改成 e.Table.Cols("商品名").DropTree = tb.Build()

高手