高分求解QuickReport打印问题！！！急！！！

Question

小第刚用QuickReport不久，
在最近发现一个奇怪的问题：
我用的是Epson LQ-1600K针式打印机
我设了自定义纸张，在服务器属性、QuickReport和打印机中都设置好了
可是打印机去总是走A4长度的纸张，不按自定义的走纸，
这个问题弄了很久，各种方法都试过了，就是不行。
用Word和ReportBuilder打印都没问题。
请问各位有没遇到过这样的问题，怎么解决！
（只能用QuickReport做打印）

Answer 1

QuickReport的纸张大小有没有设置？

Answer 2

哪位高手知道如何设置打印机的进纸，以及纸张大小
http://community.csdn.net/Expert/topic/3149/3149584.xml?temp=.1281702

Answer 3

用QReport控件怎么进行纸张大小（自定义纸张的设置）？
怎么设置横向与竖向打印？都直接用程序实现，用QReport? 
主要解答者: happyjoe 提交人: happyjoe 
感谢: GreenWaterBlueSky、zswang 
审核者: windindance 社区对应贴子: 查看 
     A :  1.引用QRPrntr单元：  
 
//把所有的纸张类型放到一combobox中  
procedure  TForm1.FormCreate(Sender:  TObject);  
var  
   PS  :  TQRPaperSize;  
begin  
   for  PS:=Default  to  Custom  do  
       ComboBox1.Items.Add(QRPaperName(PS));  
end;  
 
//给纸张定大小的时候用下面的语句  
procedure  TForm1.Button1Click(Sender:  TObject);  
var  
   i:  TQRPaperSize;  
begin  
   for  I:=  Default  to  Custom  do  
       if  QRPaperName(I)  =  ComboBox1.Text  then  
       begin  
           QuickRep1.QRPrinter  :=  TQRPrinter.Create;  
           QuickRep1.QRPrinter.PrinterIndex  :=  -1;  
           QuickRep1.Page.PaperSize  :=  I;  
           break;  
       end;  
end;  
 
设置横向与竖向打印  
   AReport.Page.Orientation  :=  poPortrait  
 
   AReport.Page.Orientation  :=  poLandScape;  
 
//参考  
http://www.csdn.net/Expert/TopicView1.asp?id=799745