打印撕纸的问题 ( 积分: 250 )

我用的reporterbuilder 6.0 做报表，打印机是EPSON LQ-630K打印机，用A5带孔压感撕纸作连续打印报表，打完之后，需要撕纸，打印机本身没有"撕纸"按键，请问如何通过代码控制打印机打完之后，自动跳到撕纸的位置.

以前用QR,设的是自定义纸张.同时还要改操作系统为自定义.提供参考

我是用自定义纸张，打印换页没有问题，问题是打印完了，想撕纸，一定要按微调按钮调整到撕纸的位置。我的报表打印都设了可以预览的，我是想在预览窗口，设个按钮，点一下那个按钮，就跳到撕纸的位置，但就不知代码如何写。

查EPSON打印机的说明书里面有指令说明

没有的，现在说明书多简单，就那么一页简简单单的纸

分两个方面解决此问题：
一、（硬件）打印机设置：（针对LQ300K/670K）
1. 安装好打印纸。按住‘字体’按钮，打开打印机电源，即可
打印出当前打印机的设置状态，并有如何改变当前设置的方法。
请将‘自动切纸’ ENABLE=TRUE ！！！
2.安装发票纸（连续纸）
A.调整其装入位置（打印机会记忆该位置）；
B.调整其切纸位置（打印机会记忆该位置）。
二、（软件）设置：（长度最关键）
1.在WINDOWS打印机属性中设置为自定义纸张（大于或等于发票纸张大小）。
2.在你自己的发票打印程序中设置好打印纸的大小（发票的实际尺寸）。
（技巧：量10或20张发票-连续纸，然后算出单张发票的长度，以0.01英寸计）
并使其TOP=0，BOTTOM=0
三、试调打印位置：
1、微调打印纸装入位置，以确保套打的上下位置正确。
2、调整打印纸的位置，以确保套打的左右位置正确。
3、微调打印机的切纸位置，以确保一张发票打印完后，能方便撕纸。
效果：打印的数据100%定位在发票框中，每张发票打印完后，
打印机自动切纸（纸前进），撕下发票；计算机打印下张发票时，打印机
自动切纸（后退），并打印；如此循环......
VAR
var lpt:TextFile;
begin
AssignFile(lpt, 'LPT1' );
ReWrite(lpt );
Writeln(lpt, '打印测试' );
Write(lpt,#13#10);
//Write( lpt, #12 );
//打印机换页
//这里可以改成打印机的控制进退纸的命令.
CloseFile( lpt );
end;

帮你顶一下，接个分：
欢迎加入delphi交流群：4654765（delphi天堂），让我们共同进步！！

问题解决了，从EPSON下载的说明书中有说明，设置了自动切纸功能，谢谢大家的帮助。