fastreport2.5中直接打印報表到打印機

 

個別情況下，我希望報表直接打印，而不需要預覽，或每次都選擇打印機以及更改打印設置。於是擴展了以下函數，直接將報表打印到指定打印機，所有信息預先設置，打印時就可以直接打印了。

新增如下函數 

function TfrReport.printto(printer:string;PageNumbers: string; Copies: Integer;
  Collate: Boolean; PrintPages: TfrPrintPages):boolean;

 begin
 
  self.SetPrinterTo(printer);
 
  self.PrepareReport;
 
  self.DoPrintReport(PageNumbers,Copies,Collate,PrintPages);

 end;

 function TfrReport.printto(printer:string):boolean;//簡單形式

 begin
 
  result:=printto(printer,'',1,false,frall);//缺省值

 end;