我在表属性PrepareEdit里加入以下代码:
If e.IsFocusCell Then '如果是焦点所在单元格
If e.Col.Name = "project_id" Then '如果正在编辑的是县市列
Dim tb As New DropTreeBuilder
tb.SourceTable = DataTables("C_EI_ENVIRPRO_PROJECT")
tb.TreeFilter="enterprise_id = '" & e.Row("enterprise_id") & "'"
tb.TreeCols = "project_name" '指定用于生成目录树的列
tb.SourceCols = "project_id|project_name" '指定数据来源列
tb.ReceiveCols = "project_id|project_name" '指定数据接收列
e.Col.DropTree = tb.Build()
End If
End If
我点击"project_id"这列时,狐表顶部功能菜单无法点击,如果选中其他列,功能菜单就正常
其他人有没这么个情况?
[此贴子已经被作者于2021/3/15 8:26:01编辑过]