用QReport--A4设置，打出来的东西怎么是原大的1/30？？？？？？？？

printer.begindoc;
  for i:=start to stop do
  begin
    if (not printer.Printing)or(printer.Aborted) then break;    application.ProcessMessages;    self.refreshstate(i);//自定义刷新self.QuickRep1的函数。
    
    self.QuickRep1.PaintTo(printer.handle,0,0);    if i<>stop then
      printer.NewPage;  end;
  printer.enddoc;
/////////////////////////////////////////////在self.QuickRep1里面看到的很好，也是值了page属性为a4,怎么出来的是屏幕上看到的1/30这么小？？？？？？？？？
谢谢！