主题：关联表同步更新问题

 那你可以去修改菜单 【同步表】的代码啊，改成自己的同步代码就行啊。

 

 又或者是，按照第3条那样做以后，同步子表时，也可以在子表同步更新父表，或者相反啊。

我修改了快捷菜单Cell菜单的 Popup事件

e.ContextMenu.Items("DockSetting").Visible= (CurrentTable.IsChild OrElse CurrentTable.IsParent)
e.ContextMenu.Items("Filter").Enabled = (CurrentTable.Current IsNot Nothing)
e.ContextMenu.Items("Load").Visible = (CurrentTable.IsRelation = True OrElse CurrentTable.IsRelation = False)
'e.ContextMenu.Items("Load").Visible = (CurrentTable.IsRelation = False) '如果是关联表则不可见

这样不管在主表还是关联表都显示"同步表"命令.快捷菜单代码
Dim t As Table = CurrentTable
If t.IsRelation = True OrElse t.IsRelation = False
    t.DataTable.Load()
End If

分别在主表和关联表操作,对关联表不起作用

e.DataTable.LoadChildren("表名")
这样加载的话设及表名

表名你根据关联表的名字获取啊。

 

表A.表B

 

你同步的时候，就这样写啊

 

DataTables("表A").LoadChildren("表B")

快捷菜单只操作当前表,不涉及表名

当前表啊

 

msgbox(currentTable.Name)

主表关联表都想用快捷菜单加载,当前表只有一个
Dim t As Table = CurrentTable
If t.IsRelation = False
    t.DataTable.Load()
    t.DataTable.LoadChildren("?")
End If

无语。

 

Dim ary() As String = CurrentTable.name.Split(".")

msgbox(ary(0))

msgbox(ary(1))

如果在主表操作就要指定关联表的表名,如果在关联表操作,就要指定主表的表名,一涉及表名,通过快捷菜单同步表就不适用了

无语，叫你再afterLoad事件写代码了啊

 

http://www.foxtable.com/help/topics/2894.htm