懇求一個Delphi報表，在線等！

Question

最近公司因為要開源節流，以前一份訂單紙一分為兩，變成二份訂單，中間還要印刷廠壓了線，程式現在要更改，我以前是用Canvas畫布寫的程式代碼，現在改時，卻發現一個邊界問題很難處理，也就是當一頁不多不少剛好印完，再印第二頁時，卻要漏掉一筆，不是從下一筆開始印，而是從下一筆的下一筆開始列，這樣無疑是個致命的漏洞，如果采購下單時沒注意，以為下了，而訂單上沒有，到生產時沒有東西，就是一個很嚴重的問題，用快速制表法Qreport，卻不知如何處理頁面尺寸，如何根據不同的訂購單號自動分頁，以及當同一訂購單在一頁中沒有印完，而要在一頁列印時，如何處理，這樣的報表是否有第三方控件，如果有的話請給我一個，謝謝！

Answer 1

怎樣在QRprint報表中根據不同的采購單號和列印的筆數（比如一頁只能列印七筆）來分頁，謝謝！

Answer 2

這樣的語句為何在QRprint中的OnPreview中通不過
procedure TfrmPrintInto.QRprintPreview(Sender: TObject);
var
  adoquery2p:tadoquery;
  ss,ss1,ss2:string;
begin
  ADOQuery2p:=tadoquery.Create(self);
  ADOQuery2p.connection:=cudb.ADOConnection1 ;
  ADOQuery2p.SQL.Text:='select * from Sprint_into';
  ADOQuery2p.open;
  adoquery2p.First;
  ss1:=adoquery2p.FieldByName('print_into_sendno').Value;
  while not adoquery2p.Eof do
  begin
  ss:=adoquery2p.FieldByName('print_into_sendno').Value;
  ss2:=ss;
  if ss1<>ss2 then
  begin
     QRprint.NewPage;
  end;
  adoquery2p.next;
  end;
  adoquery2p.close;
end;
這是為什麼，高手指教，在此先謝過啦！急啊，快幫幫忙吧！

Answer 3

var
  adoquery2p:tadoquery;
好像没错呀，贴出错误来看看。

Answer 4

錯誤提示是：Project Project1.exe raised exception class RQRError with Message 'Illegal call to NewPage'.Process stopped.Use Step or Run to continue.