以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  父行和子行同步刷新问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=157561)

--  作者:lal021962
--  发布时间:2020/10/20 21:09:00
--  父行和子行同步刷新问题
在销售定单表的doubleclick中添加如下代码:

Dim r As Row = Tables("销售定单主表").Current
Dim fl As String = "销售定单编号 = \'"  & r("销售定单编号") & "\'"
r.Load() \'加载父行
LockBaseMainForm() \'锁定主窗口
DataTables("销售定单明细表").StopRedraw \'停止绘制订单明细
DataTables("销售定单明细表").RemoveFor(fl) \'移除当前订单的订单明细
DataTables("销售定单明细表").Appendload(fl) \'追载当前订单的订单明细
DataTables("销售定单明细表").ResumeRedraw \'恢复绘制订单明细

UnLockBaseMainForm() \'解锁主窗口

但是双击销售定单表的任何一行,其他人增加过的子行并没有同步刷新。请问何解

--  作者:有点蓝
--  发布时间:2020/10/20 21:51:00
--  
其他人增加过的子行是不是没有保存?保存的数据肯定可以加载

--  作者:lal021962
--  发布时间:2020/10/21 10:11:00
--  
保存过了
--  作者:有点蓝
--  发布时间:2020/10/21 10:12:00
--  
请上传实例测试
--  作者:lal021962
--  发布时间:2020/10/21 10:31:00
--  
在doubleclick里添加代码没用,改在窗口中的afterload里就起效果了。