fastreport一些使用方法

 
uses Printers
    txtPrinterName.Items.Assign(Printer.Printers);
    frxReport1.LoadFromFile(AppConfig.ReportPath + ReportId + '.fr3');
    frxReport1.PrintOptions.Printer := txtPrinterName.Text;
    frxReport1.PrintOptions.ShowDialog := False;
    frxReport1.PrintOptions.Copies := StrToInt(txtCopies.Text);
    frxReport1.PrintOptions.PageNumbers := txtPageRange.Text;
    frxReport1.ShowProgress := False;
    {$IFDEF DEBUG}
      frxReport1.ShowReport(True);
    {$ELSE}
      frxReport1.PrepareReport(True);
      frxReport1.Print;
    {$ENDIF}
FASTREPORT分组合计字段处理
[SUM(<frxDBDataset1."Pieces">,0,0)]
[SUM(<frxDBDataset1."Pieces">,0,0) - SUM(<frxDBDataset1."ReceivedPieces">,0,0)]
posted @ 2011-09-06 20:16  delphi中间件  阅读(1601)  评论(0编辑  收藏  举报