我在使用QuickReport打印报表（报表数据是从数据库中得出），当数据量超过一页时，发现报表的下面快到页尾的地方会有一行即不能显示，又不能打印。而且按位置来说这一行并不是一个整个的Band，可能上一个Band的下半部分字体残缺。请问如何解决？

lxpq 2000-06-13 03:31:00

...全文

185 5 打赏收藏转发到动态举报

写回复

用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即可进入设置）

QuickReport打印DBGrid中的数据并实现分页

一、简单了解各控件功能　　以下是各控件最简单的使用功能，其他功能依具体的实现而介绍。　　TquickRep:带有坐标，作为其他报表控件(如TQRBand)的容器,它的Band属性可以自动添加各种类型的TQRBand. 　　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:从数据库接收图片。　　TQRBand:用来确定报表的不同位置应该显示什么内容，它上面可以放控件(参见二)。　　TQRGoups:Groups可以不限级别的组操作。当你连接了几个datasets到报表时可以通过Groups成组的对dataset进行操作。　　二、报表的控件摆放循序　　出现在所有页上的标题(PageHeader) 　　标题（只有首页才有）(Title) 　　所有列的标题(ColumnHeader) 　　记录的内容，一个字段一列(Detail) 　　摘要（最后一页才有）(Summary) 　　出现在所有页上的页脚(PageFooter) 　　这些根据设置不同的Band(不是控件，一种类型而已，在其上面可以放其他控件)来定位。总共有六种Band。　　三、一个简单的例子　　这个例子制作打印一张表的部分字段名及该字段数据内容的报表。　　建立一个新project 　　放一个TTable到Form上，DatabaseName设为BCDEMOS,TableName指向Customer表，Active设为true. 　　放一个TquickRep控件在Form上，DataSet属性为Table1.（即要显示上边Table1所指向的表的内）。　　展开TquickRep的Bands属性，设HasDetail为true,这时自动增加个detail band(一个TQRBand控件，故也可以直接放一个TQRBand控件，BandType属性设为detail就行了)。　　放一个TQRDBText控件在detail band上面，设DataSet指向Table1,DataField指向Company。第四步是设置在报表的什么位置显示什么类型的数据，而TQRDBText则具体实现。　　选TquickRep控件，按右键，选择”Preview”预览，应该看到表Customer的字段Company的所有字段值。　　到这一个简单的例子就OK了，程序实现预览及利用TQRuickRep自带的打印功能只须在Form中加一个按钮，它的OnClick事件为：QuickRep1->Preview();　　四、一个使用TQRGoups、TQRExpr控件的报表　　该报表先列出州名，接着列出该州的所有公司及公司总数，一个州列完后空一行（groups中断），列出新的州名，接着列新州下的所有公司，没有填州名的公司统一列在Unknown state下面。　　建立一个新project。　　放一个Tquery在Tquickrep上，其SQL属性为：select * from customer order by State,Company;(即根据州、公司排序)，DatabaseName为BCDMome,Active为true. 　　放一个TquickRep控件在Form1上,DataSet为Tquery1. 　　放一个TQRGroups控件在TquickRep上，这时默认为group header。（任何时候当group中断或更高级别的group中断，这个header都将打印出来，如果有表达式，根据表达式的值显示内容。）接着添加一个group footer band,添加时，放一个TQRBand控件在报表上，连接TQRGroups的FooterBand属性到这个QRBand，这时这个新建的TQRBand就成为Group Footer. （TQRGroup的一个重要特性是表达式，任何时候当表达式的值变时Group都将中断，如表达式是按省列出城市名，当前列出广东省，当属于该省的城市列完后，表达式值改变，这时Group中断，接着显示其他省的城市名。）TQRGroups的Expression属性设为Query1.State(根据不同的州来中断)。　　放一个TQRBand控件在报表上,BandType为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) 作用是在每个州的公司列完后显示该州总共有多少个公司。　　按右键选预览，应该看到不同的州名及其公司和公司公司总数。　　五、QuickReport 条件式列印　　可以直接在 TQuickReport 的 OnFilter 事件中写明条件判断,OnFilter事件的引数中有一个以 var 宣告的 PrintRecord 布林型态变数,将这个变数设为 True(预设值), 该笔记录便会印出;反之, 设为False,就不印出这笔记录. procedure TForm1.QuickReport1Filter(var PrintRecord: Boolean); begin PrintRecord := False; if YourTable.FieldByName(‘WantedField‘).AsInteger <= 100 then Exit; if YourTable.FieldByName(‘WantedField‘).AsInteger >= 150 then Exit; PrintRecord := True;

QuickReport报表查询器

QuickReport 报表按要求分页打印的演示例子。

码中文支持、分组、批量打印经验小结 FastReport 设计入库单报表实例背景：一直也没接触到什么复杂的报表，都是一些简单的报表，在 DelphI 下使用 QuickReport 一般也就能满足需要了，由于公司现在需求的变化，对条码扫描提出了新的要求，主要是扫码要包含更多地内容，以前的一维码显然不能完全满足，再说二维码也是一种趋势，故而需要解决二维码的问题，网上搜了一下，方式有多种多样，我花了 3 天时间找了很多，也尝试了很多。也经历了很多失败！总结一下在 Delphi 下实现二维码主要有三种方法： 1、使用 PtImageRW.dll 和 PtQREncode.dll 动态连接库，使用 uQRCode 生成二维码图像，如此就可以在报表中予以打印了，具体如何用 uQRCode 实现绘制二维码，本人水平太低，无法参透；结合 QuikReport 就可以实现打印二维码了，但此种有一个问题就是不支持中文，如 source1（整合到 FastRep

数据库相关

2,497

社区成员

88,445

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章