急，急，急！打印小票？！

Question

我用QuickReport在win2000下做了个打印超市小票的报表，可是打印时走纸总是A4纸的一页，能否象超市里一样，打印多少走纸多少，或者走纸为A4的一半也好？我研究了好久了，不论怎么设置（包括纸型，自定义）都没起作用，而用Word或记事本等打印则可以设置成功。望指点一二，不胜感激。！！！

Answer 1

在TQuickRep中修改页面大小就行。

Answer 2

你可以设置QuickRep中的页面格式，然后关键你的打印机要支持自定义格式纸张的打印，将自定义纸张格式设为默认打印机的首选格式

Answer 3

不行呀，我设置了，打印时还是跑一页，我试了一下使用版本的fastreport，打印设置后走纸就对了。可那是试用的，不敢用。哪位大哥能指点一下，做好给个示例代码。

Answer 4

如果打印机在LPT1口的话，可以试试下面的办法：
var
  f: TextFile;
begin
  try
    AssignFile(f, 'lpt1');
    Rewrite(f);
    writeln(lpt,'This is a test text');//加ln可以换行
    write(lpt,#13);//打印回车，就是换行
    write(lpt,'可以加控制字符')；//想让打印机走任意长度的纸，视打
                                 //印机而定
  finally
    CloseFile(f);
  end;
end;

Answer 5

to: fz101thoreau (神舟一号)  
你用的应该是WIN2000。
你根本不知道应该怎么样自定义纸张。
如果是这个问题
就找我。
QQ：158428054