以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  生成帐页问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=58138)

--  作者:实话实说
--  发布时间:2014/10/12 12:58:00
--  生成帐页问题
示例是根据[物料明细]表数据生成[物料帐页]。现在有2各问题:1、生成帐页太慢;2、点击【撤销帐页】按钮滚动条控件抖动
希望帮助优化代码
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:生成帐页.table




[此贴子已经被作者于2014-10-12 19:18:56编辑过]

--  作者:e-png
--  发布时间:2014/10/12 13:25:00
--  

 

 

你没必要再触发DataColChanged事件吧?


--  作者:实话实说
--  发布时间:2014/10/12 13:59:00
--  
以下是引用e-png在2014-10-12 13:25:00的发言:

 

 

你没必要再触发DataColChanged事件吧?


没有DataColChanged事件达不到帐页要求的效果,可以对比一下有无DataColChanged事件生成的帐页。


--  作者:有点甜
--  发布时间:2014/10/12 14:02:00
--  

 不去触发datacolchanged事件啊

 

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

 


--  作者:有点甜
--  发布时间:2014/10/12 14:05:00
--  
 填充完成以后,重新写代码计算流水账啊
--  作者:czy
--  发布时间:2014/10/12 16:25:00
--  

还不如直接生成一个分组统计表的好

 

Dim g As New GroupTableBuilder("统计表", DataTables("物料明细"))
g.Groups.AddDef("物料")
g.Groups.AddDef("物料分类")
g.Groups.AddDef("物料名称")
g.Groups.AddDef("型号规格")
g.Groups.AddDef("单位")
g.Groups.AddDef("日期", DateGroupEnum.None)
g.Totals.AddDef("入仓_数量")
g.Totals.AddDef("入仓_金额")
g.Totals.AddDef("出仓_数量")
g.Totals.AddDef("出仓_金额")
g.Totals.AddDef("库存_数量")
g.Totals.AddDef("库存_金额")
g.Build()
For Each dr As DataRow In DataTables("统计表").DataRows
    dr("库存_数量") = dr("入仓_数量") - dr("出仓_数量")
    dr("库存_金额") = dr("入仓_金额") - dr("出仓_金额")
Next
MainTable = Tables("统计表")


--  作者:实话实说
--  发布时间:2014/10/12 17:54:00
--  
CZY,好久没见了,你给我的帮助一直不忘。
--  作者:实话实说
--  发布时间:2014/10/12 18:37:00
--  
谁能在示例帮忙优化一下。,对我来说好像不那么简单。
--  作者:y2287958
--  发布时间:2014/10/12 18:57:00
--  
你先按照CZY的代码测试一下
看看结果如何
因为实在不太清楚你要达到的目的

--  作者:实话实说
--  发布时间:2014/10/12 19:07:00
--  
以下是引用y2287958在2014-10-12 18:57:00的发言:
你先按照CZY的代码测试一下
看看结果如何
因为实在不太清楚你要达到的目的

我想通过[物料明细]表自动生成[物料帐页],也就是仓库常见的账本,直接运行【物料帐页】窗口,然后点击【生成帐页】按钮就是我要的结果,只是生成速度太慢了。

[此贴子已经被作者于2014-10-12 19:07:27编辑过]