如何定义和填写中国式的报表(300分)

  • 主题发起人 主题发起人 康夫
  • 开始时间 开始时间

康夫

Unregistered / Unconfirmed
GUEST, unregistred user!
有这样一个问题:
下级单位每月要向上级单位上交报表(中国式的);
报表的格式由上级定义(没准这月又变了);
下级通过Modem先将报表的格式下载回来;
填好以后,再通过Modem将报表报上去。
所以,大概要分几个部分:
上级:报表的定义 + 通信部分(先不管它)
下级:报表的解释填写 + 通信部分(先不管它)
我做了一个,但是他们不满意,主要是不直观(主要是下级填写),请教各位大侠,怎样才能满足他们的愿(欲)望呢?
 
他们要求怎样你就怎样,只要能行
 
做REPORT一直是让人很伤心的问题。
现在有个ActiveReport,可以试试。
 
我可能有点没说清楚:我主要关心的是如何来定义(直观的)表格和
如何来解释填写它,打印的无关。
 
用EXCEL+delphi or use excel only,
 
1。不知你的上级用MODEM传过来的表格是什么文件格式?
2。为什么不用EXCEL定制模板?
3。给下级做一向导,从上级程序中读出格式,也就是动态定义表结构,做一临时表。
快快回馈,我给找方法,300分太诱人了,嘻嘻。
 
To: 阿朱
 1:上级、下级的程序都是你做的;
  2:上级定义表格时用Word或Excel都无所谓,但是下级填写时必须自己
    编程序,调用Word或Excel不可以。
  3:不是数据库中的Table,而是纸上的Table
 
直接发送EXCEL文件不行吗?反正DELPHI控制EXCEL也很容易。
最直观了。
 
买部象银行那样的打印存折的打印机,不管上级什么格式你只管对位置填数据就行
 
银行那样的打印存折的打印机?
叫平推式打印机。LawrenceZhang你搞错了,它与其它打印机没有什么不同。
只管对位置填数据?
叫套打!
 
用formula one试试呢
 
我看好象不是写报表,象是做一个Form,把上边的格式读进来,然后象填空一样
地显示在Form上,下边的人照着填空,
那你怎么解读上边来的格式?
 
如果有了格式,可以编程序实现;
可以是文本格式,也可以是其他工具的格式,只要Delphi能打开就行。
你可以把格式公布出来。
我有比较通用的报表处理程序,但绘图与打印部分是保密的;所见即所得,
可以任意缩放。
 
请各位高手少说废话,我也想听听真格的!!
 
我见过国家财政部的报表程序,是用一个文本文件传送的。里面是数字加逗号。
如果上下级单位的程序都是你写,那就不难啊。他们报表的格式都是一定的,
你一行一行地填就完了。
如果格式是变动的,那你就加一个INI文件一起传,INI文件里面保存报表的格式
信息,如有多少行,多少列,哪一行开始,哪一行结束,然后把那个数字加逗号的
文本文件读进来,按照这个格式一行一行地存放。有什么难的?
我前面说用EXCEL,意思不是要用户自己打开EXCEL,是把它嵌入你的程序里面,
用户并不知道后面你操纵了什么,只是有一个EXCEL的格式,比较熟悉的操作习惯
罢了。类似的控件还有F1BOOK,都很好用的。
 
先谢谢大家了。
>>我看好象不是写报表,象是做一个Form,把上边的格式读进来,然后象填空一样
地显示在Form上,下边的人照着填空,

就是这样,另外,报表的格式是我们自己定义的,想咋样就咋样。

>>我有比较通用的报表处理程序,但绘图与打印部分是保密的;所见即所得,
可以任意缩放。
我原来也曾经作了一个,但是效果不太好,主要是定义和绘图太麻烦,我现在想
比如说上级定义表格时用Word,下级用类似于RichEdit之类的东东来填写,不知
大家有何高见。
 
比如,在Word中将表格画好,对于需要作替换的内容用特殊字符开头做标记(如
&XA0001)。
在填表时,扫描整个文本,将找到的要替换的内容进行替换即可。
只是要注意字符串长度。
或者,将所有要替换的内容在Form上动态生成Edit进行编辑,最后替换。
 
“下级单位每月要向上级单位上交报表(中国式的);
报表的格式由上级定义(没准这月又变了);
下级通过Modem先将报表的格式下载回来;
填好以后,再通过Modem将报表报上去。”
烦烦烦......
格式不固定,现在不烦死你,以后(维护)也会烦死你。
一个格式就要一种方法啊。
这么笨的事我们可不要那么傻呵。
定好格式再说......
定好格式后什么数据最方便我们就用什么文件格式。
当然用是数据库最方便了。
下级“应用程序”录入-->Modem-->上级“收数据”,再“添加数据”
(用TBatchMove控件。)打印报表(给上司)。
上级-->Modem-->表扬下级 “做得好!”
(不用再传什么样格式了)
大家好!
 

Similar threads

回复
0
查看
1K
不得闲
回复
0
查看
863
不得闲
D
回复
0
查看
2K
DelphiTeacher的专栏
D
后退
顶部