社区
数据库相关
帖子详情
我在使用QuickReport打印报表(报表数据是从数据库中得出),当数据量超过一页时,发现报表的下面快到页尾的地方会有一行即不能显示,又不能打印。而且按位置来说这一行并不是一个整个的Band,可能上一个Band的下半部分字体残缺。请问如何解决?
lxpq
2000-06-13 03:31:00
...全文
189
5
打赏
收藏
我在使用QuickReport打印报表(报表数据是从数据库中得出),当数据量超过一页时,发现报表的下面快到页尾的地方会有一行即不能显示,又不能打印。而且按位置来说这一行并不是一个整个的Band,可能上一个Band的下半部分字体残缺。请问如何解决?
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
5 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
blue
2000-08-10
打赏
举报
回复
可以在页脚加PAGEFOOTER,但要设好它的高度,(给最后一行输出留出空间),不然的话也不起作用。
自由人
2000-06-23
打赏
举报
回复
您可以使用http://202.98.184.26/上的报表处理系统,
可以跟作者联系:xiejiating@yeah.net;或xiejiating@yahoo.com
它会使您很吃惊的!
meijg
2000-06-22
打赏
举报
回复
zhouzq的方法可以试试,加一个BAND设为pagefooter,这样每页的页尾就会有一些空间
你的问题是因为Delphi将你的detailband的内容按纸张设置的页宽打印造成的
zhouzq
2000-06-16
打赏
举报
回复
你可以加一个PAGEFOOTER,并加宽它。或在report setting 里加大botton的值。
bpc
2000-06-13
打赏
举报
回复
QuickReport部件有缺陷
解决方法只有更改报表的
设置。调整报表的bottom属性。
(双击QuickReport即可进入设置)
Quick
Report
打印
DBGrid
中
的
数据
Quick
Report
打印
DBGrid
中
的
数据
并实现分
页
利用
Quick
Report
创建
报表
一、 简单了解各控件功能 以下是各控件最简单的
使用
功能,其他功能依具体的实现而介绍。 T
quick
Rep:带有坐标,作为其他
报表
控件(如TQR
Band
)的容器,它的
Band
属性可以自动添加各种类型的TQR
Band
. TQRLabel:
打印
静态的文本(即不是根据
数据
库
值来改变的),作用象Tlabel , Caption的内容就
打印
出来的内容。 TQRDBText:
打印
数据
库
字段值,
一个
值
一行
。作用象TDBText.把它的DataSet , DataField分别赋予Table1,Company
时
,将
打印
Table1所指向的表的Company字段的内容。 TQRSysData:
打印
系统信息如
时
间,
页
码,
报表
头等。 TQRMemo:非常象TQRLabel,只是它可以
打印
多行,也是
打印
静态
数据
。 TQRRichText:
打印
RichText格式,能够连接到
一个
Form上的RichEdit控件并
打印
它的内容,不过必须是32位版本的。 TQRShape:
打印
方框、圆和垂直、水平线。 TQRImage:
打印
静态的图片,包括(BMP,WMF,ICON). TQRDBImage:从
数据
库
接收图片。 TQR
Band
:用来确定
报表
的不同
位置
应该
显示
什么内容,它上面可以放控件(参见二)。 TQRGoups:Groups可以不限级别的组操作。当你连接了几个datasets到
报表
时
可以通过Groups成组的对dataset进行操作。 二、
报表
的控件摆放循序 出现在所有
页
上的标题(PageHeader) 标题(只有首
页
才有)(Title) 所有列的标题(ColumnHeader) 记录的内容,
一个
字段一列(Detail) 摘要(最后
一
页
才有)(Summary) 出现在所有
页
上的
页
脚(PageFooter) 这些根据设置不同的
Band
(不是控件,一种类型而已,在其上面可以放其他控件)来定位。总共有六种
Band
。 三、
一个
简单的例子 这个例子制作
打印
一张表的
部分
字段名及该字段
数据
内容的
报表
。 建立
一个
新project 放
一个
TTable到Form上,DatabaseName设为BCDEMOS,TableName指向Customer表,Active设为true. 放
一个
T
quick
Rep控件在Form上,DataSet属性为Table1.(即要
显示
上边Table1所指向的表的内)。 展开T
quick
Rep的
Band
s属性,设HasDetail为true,这
时
自动增加个detail
band
(
一个
TQR
Band
控件,故也可以直接放
一个
TQR
Band
控件,
Band
Type属性设为detail就行了)。 放
一个
TQRDBText控件在detail
band
上面,设DataSet指向Table1,DataField指向Company。第四步是设置在
报表
的什么
位置
显示
什么类型的
数据
,而TQRDBText则具体实现。 选T
quick
Rep控件,按右键,选择”Preview”预览,应该看到表Customer的字段Company的所有字段值。 到这
一个
简单的例子就OK了,程序实现预览及利用TQRuickRep自带的
打印
功能只须在Form
中
加
一个
按钮,它的OnClick事件为:
Quick
Rep1->Preview(); 四、
一个
使用
TQRGoups、TQRExpr控件的
报表
该
报表
先列出州名,接着列出该州的所有公司及公司总数,
一个
州列完后空
一行
(groups
中
断),列出新的州名,接着列新州下的所有公司,没有填州名的公司统一列在Unknown state
下面
。 建立
一个
新project。 放
一个
Tquery在T
quick
rep上,其SQL属性为:select * from customer order by State,Company;(即根据州、公司排序),DatabaseName为BCDMome,Active为true. 放
一个
T
quick
Rep控件在Form1上,DataSet为Tquery1. 放
一个
TQRGroups控件在T
quick
Rep上,这
时
默认为group header。(任何
时
候当group
中
断或更高级别的group
中
断,这个header都将
打印
出来,如果有表达式,根据表达式的值
显示
内容。)接着添加
一个
group footer
band
,添加
时
,放
一个
TQR
Band
控件在
报表
上,连接TQRGroups的Footer
Band
属性到这个QR
Band
,这
时
这个新建的TQR
Band
就成为Group Footer. (TQRGroup的
一个
重要特性是表达式,任何
时
候当表达式的值变
时
Group都将
中
断,如表达式是按省列出城市名,当前列出广东省,当属于该省的城市列完后,表达式值改变,这
时
Group
中
断,接着
显示
其他省的城市名。)TQRGroups的Expression属性设为Query1.State(根据不同的州来
中
断)。 放
一个
TQR
Band
控件在
报表
上,
Band
Type为rbDetail. 放
一个
TQRExpr控件在group header上面,其Expression属性为:if(State<>’’,State,’Unknown state’),即如果公司的州没填,就归入Unknown state,否则归入State. 放三个TQRDBText在Detail上,他们的DataSet都指向Query1,DataField分别指向Company,Contact,Phone. 在放
一个
TQRExpr控件在group Footer上面,Expression为’Customers in’+State+’:’+Str(Count) 作用是在每个州的公司列完后
显示
该州总共有多少个公司。 按右键选预览,应该看到不同的州名及其公司和公司公司总数。 五、
Quick
Report
条件式列印 可以直接在 T
Quick
Report
的 OnFilter 事件
中
写明条件判断,OnFilter事件的引数
中
有
一个
以 var 宣告的 PrintRecord 布林型态变数,将这个变数设为 True(预设值), 该笔记录便
会
印出;反之, 设为False,就不印出这笔记录. procedure TForm1.
Quick
Report
1Filter(var PrintRecord: Boolean); begin PrintRecord := False; if YourTable.FieldByName(‘WantedField‘).AsInteger <= 100 then Exit; if YourTable.FieldByName(‘WantedField‘).AsInteger >= 150 then Exit; PrintRecord := True;
Quick
Report
报表
查询器
Quick
Report
报表
查询器
Quick
Report
分
页
打印
演示
Quick
Report
报表
按要求分
页
打印
的演示例子。
DelphI 下
使用
Quick
Report
码
中
文支持、分组、批量
打印
经验小结 Fast
Report
设计入库单
报表
实例 背景: 一直也没接触到什么复杂的
报表
,都是一些简单的
报表
,在 DelphI 下
使用
Quick
Report
一般也就能 满足需要了,由于公司现在需求的变化,对条码扫描提出了新的要求,主要是扫码要包含更多地内容,以 前的一维码显然
不能
完全满足,再说二维码也是一种趋势,故而需要
解决
二维码的问题,网上搜了一下, 方式有多种多样,我花了 3 天
时
间找了很多,也尝试了很多。也经历了很多失败!总结一下在 Delphi 下实 现二维码主要有三种方法: 1、
使用
PtImageRW.dll 和 PtQREncode.dll 动态连接库,
使用
uQRCode 生成二维码图像,如此就可以 在
报表
中
予以
打印
了,具体如何用 uQRCode 实现绘制二维码,本人水平太低,无法参透;结合 Quik
Report
就可以实现
打印
二维码了,但此种有
一个
问题就是不支持
中
文,如 source1(整合到 FastRep
数据库相关
2,497
社区成员
88,445
社区内容
发帖
与我相关
我的任务
数据库相关
Delphi 数据库相关
复制链接
扫一扫
分享
社区描述
Delphi 数据库相关
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章