QuickReport打印分页问题？

looking8 2004-10-08 09:17:01
我的QuickRep中只有一个DetailBand，
现在要时行分页，每页3条记录，

代码如下：

全局变量：
i:integer;

QuickRep1的BeforePrint事件：
i:=0;

DetailBand1的AfterPrint事件：

i:=i+1;
if i = 3 then
begin
i:=0;
//QuickRep1.NewPage;
DetailBand1.ForceNewPage := true;
end;
DetailBand1.ForceNewPage := false;


在2000下，EPSON 1600K 下正常

为何到98下面，打印机是什么不记得了，就不正常！

就是想每页打印的位置要相同，因为要套打的！
...全文
280 21 打赏 收藏 转发到动态 举报
写回复
用AI写文章
21 条回复
切换为时间正序
请发表友善的回复…
发表回复
looking8 2004-11-02
  • 打赏
  • 举报
 回复
这样的贴也要结吗？
looking8 2004-10-16
  • 打赏
  • 举报
 回复
UPUP
looking8 2004-10-15
  • 打赏
  • 举报
 回复
看来没人会回答的了 :))


另外问一下，打印时怎样知道已经打印到第几页了？

能否知道打印机信息，如卡纸等信息！


是这样的，打印时可能会出现卡纸现象，怎样知道从第几页起开始卡纸了，需要从卡纸的那一页重新打印！
tfxg 2004-10-12
  • 打赏
  • 举报
 回复
在98编译一下吧
looking8 2004-10-12
  • 打赏
  • 举报
 回复
再UP一下
looking8 2004-10-11
  • 打赏
  • 举报
 回复
各位有没有用过 EPSON LQ-1600K 的打印机呢

纸张大小：380*279 (mm)

页边距都为0

DetailBand 的Height为 346

你们是怎么设置的呢？
qdmis 2004-10-11
  • 打赏
  • 举报
 回复
应该是纸张高度设置不对
qdmis 2004-10-11
  • 打赏
  • 举报
 回复
自定义纸张大小,精确点.

我也碰到过此问题,如果不精确,一页误差一点,100页就多了,自己多试试
looking8 2004-10-11
  • 打赏
  • 举报
 回复
郁闷

没人帮忙

都弄了差不多一星期了
还是不行
v007 2004-10-10
  • 打赏
  • 举报
 回复
UP一下
lyguo 2004-10-10
  • 打赏
  • 举报
 回复
学习
looking8 2004-10-10
  • 打赏
  • 举报
 回复
为什么在preview时没问题
在打印时就会向上偏移呢
looking8 2004-10-10
  • 打赏
  • 举报
 回复
不知道怎么的

现在在2000上面也不行了

打印机为EPSON LQ-1600K

QR3.62
looking8 2004-10-10
  • 打赏
  • 举报
 回复
各位帮忙啊

不管用什么控件，不管什么样的代码，只要能达到我的要求就行

因为现在做的这个打印是需要套打的，所以需要比较精确！

现在要求是：
每页打印三条记录，因为一次需要打印上千条记录，所要求每页打印的位置
都是相同的。

为什么我的打印每一张都会向上偏移呢？

请帮忙啊！！！
looking8 2004-10-09
  • 打赏
  • 举报
 回复
有没有人碰到这种情况啊

只要能使每页打印的位置相同
不管什么方法都可以
looking8 2004-10-09
  • 打赏
  • 举报
 回复
不用我的代码！

请问
如何实现每页打印的起始位置都相同呢？
就是分页问题
looking8 2004-10-08
  • 打赏
  • 举报
 回复
我在打印机里已设好自定义纸张了

对QR里也设成自定义的了
wychero 2004-10-08
  • 打赏
  • 举报
 回复
设自定义纸张试试。
looking8 2004-10-08
  • 打赏
  • 举报
 回复
就是第二页的向上偏移了
后面的也接着向上偏移
shadowfish 2004-10-08
  • 打赏
  • 举报
 回复
什么现象，怎么不正常了？
加载更多回复（1）
QuickReport 分页打印演示
QuickReport 报表按要求分页打印的演示例子。
QuickReport打印DBGrid中的数据
QuickReport打印DBGrid中的数据并实现分页
quickreport自动换行
方便quickreport控件自动换行问题 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Buttons, Grids, DBGrids; type TForm1 = ...
Report machine 2.4
- TRMFormReport打印StringGrid,DBGrid等Grid时，对超宽Grid增加分页功能， - MemoView增加属性CalcValue,可以访问MemoView中的内容， - CalcMemoView增加TotalCalc属性,现在CalcMemoView科轻松实现页小计，页...
rm2.6正式版本
- TRMCrossView去掉一些BUG v.2.2(Build 2002/01/11) - 增加缩放打印功能， - TRMFormReport打印StringGrid,DBGrid等Grid时，对超宽Grid增加分页功能， - MemoView增加属性CalcValue,可以访问...
Delphi

5,386

社区成员

262,729

社区内容

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告
暂无公告

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

+ 用AI写文章