Delphi 用QReport制作报表后,报表的格式是Custom size 21 x 27.9 设计的。运行后在预览窗口的打印设置也设置纸张格式为Custom 21 X 27.9。 
然后按下打印的图标,但出来的仍是按A4格式打印。 
试过了几种办法: 
QuickRep1.QRPrinter.PaperSize := QRPrntr.custom; 
QuickRep1.Printer.PaperSize := QRPrntr.custom; 
QuickRep1.PrinterSettings.PaperSize := QRPrntr.custom; 
QuickRep1.Page.PaperSize := QRPrntr.custom; 
我以为是custom size有问题,后来换成 A5,也还是按A4来走纸。 
也用过PrinterSetupDialog设置后再调用 
QuickRep1.print,打印机还是按A4格式,真是服了它。 
打印机是 Epson LQ-1600III 针打。 
纸张是有孔的连续纸,比 A4要短 2cm  这样每页都会走多2cm
相信在其它打印发票等都会有这样的问题,那位碰到过? 
能指点一二?谢。 
另,打印机是没问题的,在word中设置纸张格式为US std Fanfold就很正确打印。 
 
 
其实该问题与很多人问的问题相同,就是定义报表大小后在预览时生效,打印时还是按A4的走纸,这样就走位了。