打印dbgrid,stringgrid,datasource.的控件!剧酷!!! (0分)

  • 主题发起人 主题发起人 wujinhao
  • 开始时间 开始时间
W

wujinhao

Unregistered / Unconfirmed
GUEST, unregistred user!
http://www.softreg.com.cn/shareware.asp?id=7495

reprint
使用说明
本人长期使用delphi做数据库的开发,报表控件使用Quickrpt,在打印上经常遇到一些问题,于是自己经常编写一部分打印的程序,经过总结开发了这个控件。
本控件可打印 datasource,dbgrid,stringgrid.
一 、控件属性:
1、colstitle 设置报表的列标题属性
(1)alignment 列标题对齐方式。
(2)font 列标题字体
(3)print 设置是否打印列标题
(4)rowspace 列标题行的高度
2、datasource 选择要打印的datasource
3、dbgrid 选择要打印的dbgrid
4、stringgrid 选择要打印的stringgrid
5、detail 设置要打印的明细数据属性
(1)arrange 设置明细字段排列方向
Horizontal 横向打印(默认的一般打印)
Vertical 竖向打印(字段竖向排列适合打印字段内容较长的报表如“会议纪录”)
(2)aotureturn 打印明细字段时,如果字段超过列的宽度是否允许自动换行
(3)colsline 设置竖线属性引用tpen类
(4)footer 设置明细尾
(5)frame 设置明细边框属性引用tpen类
(6)head 设置明细头同footer
(7)rowsline 设置横线属性引用tpen类
(8)rowspace 设置明细行的高度
(9)top 明细与标题的距离
6、page 设置纸张的上下左右边距
7、pagefooter 设置页脚同明细尾
8、pageheader 设置页眉同页脚
9、printobject 选择要打印的对象 (datasource 、dbgrid、 stringgrid )
10、title 设置标题类页眉、页脚
二 、控件方法:
(1) preview 预览
(2) print 打印
(3) SaveToFile() 保存为报表文件
(4) SaveToStream() 保存为流(然后就可把整个报表存到数据库了很方便哦! ~_~)
(5) PrintFile() 打印报表文件
(6) PrintStream() 打印流(流的数据库存取就不用多说了吧)
(7) PreviewFile() 预览文件
(8) PreviewStream() 预览流
(9) OptionToStream() 报表的属性保存为流
(10) OptionFromStream() 从流中得到报表属性
三、 控件事件:
AfterPrint 打印后
BeforePrint 打印前
(本来很多事件,但没有预览,后来加上预览以及一些方法后实现很困难就去掉了!)
四、注意事项
(1) text 属性,输入“|#|”打印页码值,如果想打印页码可输入“第|#|页” 输入“|RecordCount|”打印 记录数
(2) 不同的打印机,打印和预览效果可能有一点点不同(保证数据打印完全正确一致)。本人用一台针式和一台激光打印机做测试,开始差别较大后经过调试基本一致,不知其他打印机如何。
就这些个吧基本满足了我的软件开发需要,解决了很多问题,关键是做报表省了很大力气,当然了很复杂的报表还是要其它报表控件来解决。如果有其他问题或好的建议可与我联系。
程序设计:吴进昊
E-mail :jinhaowu@hotmail.com
qq :54254770
 
不错,用过!
但有些功能还得加上!
  1、能否为报表增加汇总行
  2、明细数据能否增加Alignment属性
  3、能否增加明细数据格式化显示属性,如同QuickRept的Mask,如下显示数据2,321.00
  4、能否增加表格标题栏的caption定制,表题的制作能否多样一点,比如划斜线,双行标题
  5、能否增加一个打印系统属性“|DateTime|”显示打印的时间
 
表格标题栏是 title.text(Tstrings) 输入任意符号,可多行.
至于“|DateTime|”可直接在任意STRING类型的属性里设置.
例如:title.text.append(datetostr(DateTime))
其他问题我会改进,谢谢楼上的意见!
 
另外,还有两点建议:
1、能否增加个设置纸张大小的属性。在预览时,再通过打印机属性来选择纸张,
是比较麻烦的,特别是当有几种规格的报表交错打印时,每次都得选择纸张
2、表格标题栏的划线和明细栏的划线,最好是分开设置,最好将两部分的划线可
以分开设置是打印还是不打印
关于text属性(包括Tstrings和string),我觉得也有要改进的地方,每行在报表中
占一行,假如要实现下面的报表:
XXXXXXXXXXXXXXXX公司
XXXX年XX月 XX材料 明细帐 金融单位(元:人民币)
-----------------------------------------------------------------------
XXXXXXXX| XXXX | XXXX | XXXXXXXX | XXXXXXXX | XXXXXXXXXX
----------------------------------------------------------------------
aaaaaaa aaaaa aaaa aaaaaaaa aaaaaaaa aaaaaaaaaaa
----------------------------------------------------------------------
bbbbbbb bbbbb bbb bbbbbbbb bbbbbbbb bbbbbbbbbbb
----------------------------------------------------------------------
2003-1-9 12:50:34 第1页
能不能做个merge属性,将两行text合并
 
设置纸张大小的属性刚做好,还没有上传.
想你说的报表样式,
XXXX年XX月 XX材料 明细帐 金融单位(元:人民币)
可以在 detail.heat.text 设置.但是只在第一页显示,以后我会增加属性,是否让他每页都
显示.
 
我可以用邮箱发给你!
 
至于 表格标题栏的划线问题,表格标题栏我要大改,增加多行标题的功能,到时一起解决.
 
能不能先增加一个明细栏的数据对齐属性,最好有四舍五入功能
在有关财务数据的显示,如果数据是左对齐或居中,则毫无用处
 
可否让我也看看!
richard_wu@yeah.net
 
也发给我一份把,我正需要打印表格呢!谢谢
wldandan@163.com
 
楼上两位兄弟,到下面网址下载:
http://www.hbhy.com.cn/download/reprint.zip
 
明细数据已增加Alignment属性,设置纸张大小和打印方向的属性也设置完成,需要的话来信!!
 
已经给你发过信了,怎么我还没收到?
so-cool@yeah.net
 
我现在在外地到 http://www.csdn.net/cnshare/soft/15/15471.shtm 下载
 
如何安装使用?要不要先安装QuickReport?
 
不用先安装QuickReport!
 
下载后怎样安装使用?谢谢你!!!
 
安装reprint.pas就可以了
 
为什么我的表格中得数据总是偏左显示。我设置了
Detail的Alignment为center阿
 
后退
顶部