Foxtable(狐表)用户栏目专家坐堂 → 父行和子行的同步刷新


  共有3443人关注过本帖树形打印复制链接

主题:父行和子行的同步刷新

帅哥哟,离线,有人找我吗?
seal51
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
父行和子行的同步刷新  发帖心情 Post By:2014/12/4 18:32:00 [显示全部帖子]

帮助文件中父行和子行的同步刷新的代码应该放在哪个事件中呢?

 回到顶部
帅哥哟,离线,有人找我吗?
seal51
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2014/12/4 19:31:00 [显示全部帖子]

我做了一个按钮, 代码如下:

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() '解锁主窗口

 

发现主表新增的行没有加载的话, 点击刷新加载不了新增的数据, 只有主表的新增行加载后, 子表能刷新, 怎么办


 回到顶部
帅哥哟,离线,有人找我吗?
seal51
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2014/12/4 19:40:00 [显示全部帖子]

也就是我点击了按钮, 订单主表的数据没有被刷新

 回到顶部
帅哥哟,离线,有人找我吗?
seal51
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2014/12/4 19:44:00 [显示全部帖子]

保存了, 但没有刷新

 回到顶部
帅哥哟,离线,有人找我吗?
seal51
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2014/12/4 19:48:00 [显示全部帖子]

哦, 主表也要刷新,怎么办


 回到顶部
帅哥哟,离线,有人找我吗?
seal51
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2014/12/4 19:50:00 [显示全部帖子]

CurrentTable.DataTable.load, 这个代码只能刷新当前表,不能刷新关联表, 对吗?这个代码和Syscmd.Table.Load()有区别吗?

 


 回到顶部
帅哥哟,离线,有人找我吗?
seal51
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2014/12/4 19:56:00 [显示全部帖子]

CurrentTable.DataTable.load, 这个代码只能刷新当前表,不能刷新关联表, 对吗?这个代码和Syscmd.Table.Load()有区别吗?


 回到顶部
帅哥哟,离线,有人找我吗?
seal51
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2014/12/5 10:22:00 [显示全部帖子]

订单主表的CurrentChanged事件代码:

 

If e.Table.Current IsNot Nothing Then
    Dim Filter As String = "工作号 = " & e.Table.Current("工作号")
    If  DataTables("订单明细表").Find(Filter) Is Nothing Then '如果对应的订单明细没有加载过
        DataTables("订单明细表").AppendLoad(Filter) '则追载此订单的订单明细
    End If
End If

 

出现错误:

 

.NET Framework 版本:2.0.50727.3655
Foxtable 版本:2014.11.11.1
错误所在事件:订单主表,CurrentChanged
详细错误信息:
无法在 System.String 和 System.Int32 上执行“=”操作。


 回到顶部
帅哥哟,离线,有人找我吗?
seal51
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2014/12/5 11:00:00 [显示全部帖子]

如何只刷新订单主表中更新的数据


 回到顶部
帅哥哟,离线,有人找我吗?
seal51
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2014/12/5 11:04:00 [显示全部帖子]

做了一个按钮, 代码为:

 

Dim id As Integer = DataTables("订单主表").Compute("Max(_Identify)")
Dim Filter As String = "[_Identify] > " & id
DataTables("订单主表").AppendLoad(Filter, False)

 

电脑A在订单主表内增加了一条数据, 在电脑B的订单主表里按这个按钮, 没反应??


 回到顶部
总数 15 1 2 下一页