FastReport VCL是用于Delphi，C ++ Builder，RAD Studio和Lazarus的報(bào)告和文檔創(chuàng)建VCL庫(kù)。它提供了可視化模板設(shè)計(jì)器，可以訪問最受歡迎的數(shù)據(jù)源，報(bào)告引擎，預(yù)覽，將過(guò)濾器導(dǎo)出為30多種格式，并可以部署到云，Web，電子郵件和打印中。

近日，F(xiàn)astReport VCL更新至v6.9，在新版本中，在PDF導(dǎo)出中增加了對(duì)以下對(duì)象的交互式表單支持：文本，復(fù)選框和圖片。能夠通過(guò)InteractiveFormsFontSubset屬性將所需的字形僅包含在交互式形式中。同時(shí)修復(fù)了多個(gè)Bug問題。歡迎下載體驗(yàn)。（點(diǎn)擊下方按鈕下載）

立即點(diǎn)擊下載FastReport VCL v6.9最新版

加載和保存報(bào)告

默認(rèn)情況下，報(bào)告表單與項(xiàng)目表單一起存儲(chǔ)，即存儲(chǔ)在DFM文件中。在大多數(shù)情況下，不需要任何其他操作，因此您無(wú)需采取特殊措施即可加載報(bào)告。如果您決定將報(bào)告表單存儲(chǔ)在文件中或DB BLOb字段中（這提供了極大的靈活性，即您可以在不重新編譯程序的情況下修改報(bào)告），則必須使用以下TfrxReport方法來(lái)加載和保存報(bào)告：

function LoadFromFile(const FileName: String; ExceptionIfNotFound: Boolean = False): Boolean;

procedure LoadFromStream(Stream: TStream);

procedure SaveToFile(const FileName: String);

procedure SaveToStream(Stream: TStream);

帶有報(bào)告表單的文件默認(rèn)情況下具有“ FR3”擴(kuò)展名。

例子：
Pascal:

frxReport1.LoadFromFile('c:\1.fr3');
frxReport1.SaveToFile('c:\2.fr3');

frxReport1->LoadFromFile("c:\\1.fr3");
frxReport1->SaveToFile("c:\\2.fr3");

調(diào)用報(bào)表設(shè)計(jì)器是通過(guò)TfrxReport.DesignReport方法執(zhí)行的。設(shè)計(jì)人員必須包含在您的項(xiàng)目中（使用TfrxDesigner組件或?qū)ⅰ?frxDesgn”單元添加到使用列表中就足夠了）。

該DesignReport方法采用兩個(gè)默認(rèn)參數(shù)：

procedure DesignReport(Modal: Boolean = True; MDIChild: Boolean = False);

例子：

frxReport1.DesignReport;

應(yīng)用以下兩種TfrxReport方法之一將啟動(dòng)報(bào)告：

procedure ShowReport(ClearLastReport: Boolean = True);

function PrepareReport(ClearLastReport: Boolean = True): Boolean;

在大多數(shù)情況下，使用第一種方法更為方便。它會(huì)立即顯示預(yù)覽窗口，同時(shí)繼續(xù)構(gòu)建報(bào)告。

如果需要在先前構(gòu)造的報(bào)表中添加另一個(gè)報(bào)表（此技術(shù)用于批量報(bào)表打印），則可以方便地使用“ ClearLastReport”參數(shù)。
例子：

frxReport1.ShowReport;

可以通過(guò)兩種方式在預(yù)覽窗口中顯示報(bào)告：通過(guò)調(diào)用TfrxReport.ShowReport 方法（如上所述）或借助該TfrxReport.ShowPreparedReport方法。在第二種情況下，不執(zhí)行報(bào)告構(gòu)造，但顯示完成的報(bào)告。這意味著，您應(yīng)該在PrepareReport方法的幫助下預(yù)先構(gòu)建它，或者從文件中加載以前構(gòu)建的報(bào)告（請(qǐng)參閱加載和保存完成的報(bào)告）。

例子：
Pascal:

if frxReport1.PrepareReport then
  frxReport1.ShowPreparedReport;

if(frxReport1->PrepareReport(true))
  frxReport1->ShowPreparedReport();

打印報(bào)告

在大多數(shù)情況下，您將從預(yù)覽窗口中打印報(bào)告。要手動(dòng)打印報(bào)告，應(yīng)使用以下TfrxReport.Print方法，例如：

frxReport1.LoadFromFile(...);
frxReport1.PrepareReport;
frxReport1.Print;

加載并保存完成的報(bào)告

可以從預(yù)覽窗口執(zhí)行。這也可以在TfrxReport.PreviewPages方法的幫助下手動(dòng)執(zhí)行：

    function LoadFromFile(const FileName: String; ExceptionIfNotFound: Boolean = False): Boolean;
    procedure SaveToFile(const FileName: String);
    procedure LoadFromStream(Stream: TStream);
    procedure SaveToStream(Stream: TStream);

例子：
帕斯卡：

frxReport1.PreviewPages.LoadFromFile('c:\1.fp3');
frxReport1.ShowPreparedReport;

frxReport1->PreviewPages->LoadFromFile("c:\\1.fp3");
frxReport1->ShowPreparedReport();

匯出報(bào)告

可以從預(yù)覽窗口執(zhí)行。也可以通過(guò)TfrxReport.Export方法手動(dòng)執(zhí)行該操作。在此方法的參數(shù)中，應(yīng)指定要使用的導(dǎo)出過(guò)濾器：

frxReport1.Export(frxHTMLExport1);

創(chuàng)建一個(gè)自定義預(yù)覽窗口

FastReport在標(biāo)準(zhǔn)預(yù)覽窗口中顯示報(bào)告。如果由于某種原因它不適合您，則可能會(huì)創(chuàng)建一個(gè)自定義預(yù)覽表單。為此，TfrxPreview設(shè)計(jì)了FastReport組件面板中的組件。要顯示報(bào)告，應(yīng)將此TfrxReport.Preview屬性的鏈接分配給該屬性。

使用TfrxPreview組件時(shí)有兩個(gè)典型的問題。它不處理鍵（箭頭，PgUp，PgDown等）和鼠標(biāo)滾輪（如果有）。要TfrxPreview使用鍵，請(qǐng)將焦點(diǎn)傳遞給它（例如，可以在OnShow表單的事件處理程序中完成）：

frxPreview.SetFocus;

procedure TForm1.FormMouseWheel(Sender: TObject; Shift: TShiftState; 
  WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean);
begin
  frxPreview1.MouseWheelScroll(WheelDelta);
end;

如果您對(duì)FastReport感興趣，歡迎加入FastReport QQ交流群：702295239

還想要更多嗎？您可以點(diǎn)擊閱讀【FastReport 報(bào)表2020最新資源盤點(diǎn)】，查找需要的教程資源。讓人興奮的是FastReport .NET正在慧都網(wǎng)火熱銷售中！在線訂購(gòu)惠享超低折扣。>>查看價(jià)格詳情