當前位置：首頁 > 编程资源 > 编程问答 >内容正文

编程问答

fastreport(A)

發布時間：2025/3/20 编程问答 22 豆豆

生活随笔收集整理的這篇文章主要介紹了 fastreport(A) 小編覺得挺不錯的,現在分享給大家,幫大家做個參考.

TfrxReport
此為最主要的報表元件，一個 TfrxReport 元件組成一份報表。在設計時期，雙擊此
元件可打開報表設計器(Report Designer)，此元件擁有所有載入、存盤、設計及來看
報表必須的屬性及方法。

TfrxReport 提供的方法：

procedure Clear;
??? 清除報表

function LoadFromFile(const FileName: String; ExceptionIfNotFound: Boolean = False): Boolean;
??? 從給予的文件載入報表。假如第二個參數等于 “True”且文件不存在，將產生例外狀況，假如文件載入成功，返回值為”True ” 。

procedure LoadFromStream(Stream: TStream);
??? 從數據流(stream)載入報表。

procedure SaveToFile(const FileName: String);
??? 保存報表至指定的文件。

procedure SaveToStream(Stream: TStream);
??? 保存報表至數據流(stream)。

procedure DesignReport;
??? 進入報表設計環境。報表設計環境將嵌入在你的工程文件要執行此功能，只要在 uses 句加入 frxDesign單元或在工程文件中加入“TfrxDesigner” 元件。

procedure ShowReport(ClearLastReport: Boolean = True);
??? 開始制作報表并輸出結果顯示在預覽窗口。例如“ClearLastReport”參數等于“False”，報表將會加入至前一個報表的后面，否則前一個建立的報表會被清除預置值。

function PrepareReport(ClearLastReport: Boolean = True): Boolean;
??? 開始制作報表，但沒有顯示預覽窗口。參數指定方式與“ShowReport” 方法(method)相同。假如報表創建成功，此函數返回“True” 。

procedure ShowPreparedReport;
??? 顯示先前使用“PrepareReport” 所建立的報表。

procedure Print;
??? 打印報表。

procedure Export(Filter: TfrxCustomExportFilter);
??? 使用指定的導出過濾器(exportfilter)導出報表內容。因為下列的方法只提供一種服務在大部分的情況之下，你并不須要使用它們。在增強 FastReport 的報表功能方面，他們可能是很有用的。例如，當撰寫自定義的報表元件時。

function Calc(const Expr: String): Variant;
??? 計算“Expr” 運算式并返回結果。

function GetAlias(DataSet: TfrxDataSet): String;
??? 返回指定數據集 (dataset)的別名。

function GetDataset(const Alias: String): TfrxDataset;
??? 返回指定別名(Alias)的數據集。

procedure DoNotifyEvent(Obj: TObject; const EventName: String);
??? 執行連接至”Obj” 物件的“EventName”事件處理程序。

procedure DoParamEvent(const EventName: String;var Params:Variant);
??? 以任意的參數類型執行 “EventName”的事件處理程序。

procedure GetDatasetAndField(const ComplexName: String; var Dataset: TfrxDataset; var Field: String);
??? 解析“ComplexName”復合名稱(以DataSet.”Field”表示)，并返回參照的數據集及字段名稱。

procedure GetDataSetList(List: TStrings; OnlyDB: Boolean = False);
??? 從 List參數返回報表可用的數據集列表，假如第二個參數為 True，僅返回連接到數據庫的數據集。

procedure AddFunction(const FuncName: String; const Category: String = ''; const Description: String = '');
??? 加入使用者自定函數至報表的函數列表。

TfrxReport 元件擁有下列屬性：

property EngineOptions: TfrxEngineOptions;
??? 與 FastReport引擎相關的屬性集合。

property IniFile: String;
??? 儲存 fastReport 環境變量設定的文檔或注冊碼的名稱。

property Preview: TfrxCustomPreview;
??? 連接到“TfrxPreview” 元件，完成的報表將顯示在此元件上。假如此屬性空白，報表將顯示于標準的預覽窗口。

property PreviewOptions: TfrxPreviewOptions;
??? 與報表預覽相關的屬性。

property PrintOptions: TfrxPrintOptions;
??? 與報表打印相關的屬性。

property ReportOptions: TfrxReportOptions;
??? 定義報表相關的屬性。

property ScriptLanguage: String;
??? 報表使用的腳本語言 (Script la nguage)。

property ScriptText: TStrings;
??? 腳本語言的內容。

property AllObjects: TList readonly;
??? 報表內所有的物件列表（包括頁定義元件）。

property DataSets: TfrxReportDataSets readonly;
??? 報表可用的數據集列表。

property Designer: TfrxCustomDesigner readonly;
??? 連結到報表設計元件

property Engine: TfrxCustomEngine readonly;
? 連結報表引擎。對于要使用程序碼處理報表是非常有用的，它可以自定義報表處理引擎。

property Errors: TStrings readonly;
?? 錯誤清單，發生在一個或其它的進程。

property FileName: String;
??? 定義報表的文件名稱；文件名會顯示在設計環境的窗口標題中。

property PreviewPages: TfrxCustomPreviewPages readonly;
??? 定義一個連結到已完成的報表頁面。它可被使用在所有地方，例如打印、存盤及導出等。

property Pages[Index: Integer]: TfrxPage readonly;
??? 報表頁面列表，其中對話框類型也包括在列表中。

property PagesCount: Integer readonly;
? 報表的頁數。

property Script: TfsScript readonly;
? 連結報表的“TfsScript” 元件，經由該連接，你可以為你的報表腳本語言加入變量、類型、函數以供以后調用。

property Style: TfrxStyle;
??? 報表式樣。

property Variables: TfrxVariables readonly;
??? 報表變量列表。

FastReport 引擎的相關屬性集合：
TfrxEngineOptions = class(TPersistent)
published
property ConvertNulls: Boolean default True;
轉換數據庫字段的值至或空字串依字段型態而定。
“Null” “0”, “False” ( )

property DoublePass: Boolean default False;
使報表進行二次處理，第一次進行資料搜集例如報表總頁數，第二次才實際進行報
( )
表處理。

property MaxMemSize: Integer default 10;
配置報表頁面緩存(Cache)的最大內存使用量(Mbytes)，當“UseFileCashe”屬
性等于“True” 時特別有用。假如在建立期間耗用太多內存，已建立的報表緩存頁面
將會被寫入緩存文件，此屬性并不非常的精確，它只大約的決定內存的限制。

property PrintIfEmpty: Boolean default True;
定義是否要打印空白報表（沒有打印資料的報表）。

property TempDir: String;
指定保存臨時文件的目錄。

property UseFileCache: Boolean default False;
定義產生的預覽報表是否緩存到文件。見屬性
(Cache) ( “MaxMemSize” )
end;

報表預覽的相關屬性集合：

TfrxPreviewOptions = class(TPersistent)
published
property AllowEdit: Boolean default True;
允許或不允許編輯預覽窗口中的報表。

property Buttons: TfrxPreviewButtons;
預覽窗口中的可用按鈕集合。

TfrxPreviewButtons = setof TfrxPreviewButton; TfrxPreviewButton
= (pbPrint, pbLoad, pbSave, pbExport, pbZoom, pbFind, pbOutline,
pbPageSetup, pbTools, pbEdit, pbNavigator);
此屬性可用的值如下：
pbPrint －打印
pbLoad －載入文件
pbSave －存報表到文件
pbExport －導出
pbZoom －顯示比例
pbFind －搜尋
pbOutline －選定報表邊框
pbPageSetup －頁面設定
pbTools －工具
pbEdit －編輯
pbNavigator －導航

上面的值你可以混合使用。

property DoubleBuffered: Boolean default True;
預覽窗口采用雙緩存區模式。假如啟用預置值，畫面輸出時屏幕不會有閃爍的情形，
( )
但處理速度會稍微下降。

property Maximized: Boolean default True;
定義預覽窗口是否最大化。

property MDIChild: Boolean default False;
定義預覽窗口是否為MDIChild (給MDI 介面使用)。

property Modal: Boolean default True;
定義預覽窗口是否為Modal模示。

property OutlineVisible: Boolean default False;
定義是否顯示報表的大綱。

property OutlineWidth: Integer default 120;
定義報表大綱顯示的寬度。

property ShowCaptions: Boolean default False;
定義是否顯示按鈕的標題。當啟動該屬性時，你應該限制Buttons 屬性所顯示按鈕
的個數，因為所有的按鈕無法顯示于同一畫面。

property Zoom: Extended;
預置的顯示百分比率。

property ZoomMode: TfrxZoomMode default zmDefault;
預置顯示模式。可用的值如下：

zmDefault －顯示百分比率視“Zoom” 屬性而定
zmWholePage －整頁模示
zmPageWidth －頁寬
zmManyPages －兩頁
end;

報表打印相關屬性的集合：

TfrxPrintOptions = class(TPersistent)
published
property Copies: Integer default 1;
預置的打印份數。
property Collate: Boolean default True;
不管校對份數。
property PageNumbers: String;
打印的頁碼。例如，“1,3,5-12,17-“ 。
property Printer: String;
打印機名稱。
property PrintPages: TfrxPrintPages default ppAll;
定義要打印的方式。可用的值如下：
ppAll – 全部
ppOdd – 奇數頁
ppEven – 偶數頁
property ShowDialog: Boolean default True;
是否顯示打印窗口。
end;

報表相關屬性的集合：

TfrxReportOptions = class(TPersistent)
published
property Author: String;
報表作者。
property CreateDate: TDateTime;
報表建立日期。
property Description: TStrings;
報表描述。
property Name: String;
報表名稱。
property LastChange: TDateTime;
報表最后修改日期。
property Password: String;
報表密碼。假如該屬性為空白，當打開報表定義檔時需要輸入密碼。
property Picture: TPicture;
報表圖片。
property SilentMode: Boolean default False;
無聲 (Silent)方式。所有的錯誤信息將被保存在“TfrxReport.Errors”屬
性，而不會在屏幕上顯示任何信息。

property VersionBuild: String;
property VersionMajor: String;
property VersionMinor: String;
property VersionRelease: String;
決定報表版本的屬性。
end;

下列的事件定義于 TfrxReport 元件：2
property OnAfterPrint: TfrxAfterPrintEvent;
發生在處理完每個報表物件之后（打印后）。

property OnBeforePrint: TfrxBeforePrintEvent;
發生在處理完每個報表物件之前（打印前）。

property OnClickObject: TfrxClickObjectEvent;
當預覽一份報表時，選取報表內的物件時觸發該事件。
property OnGetValue: TfrxGetValueEvent;
當啟動一份報表，發現未定義的變量時，該事件必須返回變量的值。

property OnManualBuild: TfrxManualBuildEvent;
當開始打印報表，假如此事件被啟動，然后FastReport的引擎將被阻斷(不處理)，
報表處理方法將交由程序員所寫的程序處理。

property OnMouseOverObject: TfrxMouseOverObjectEvent;
當報表處于瀏覽窗口，且鼠標指針移到該物件上時觸發此事件。

property OnUserFunction: TfrxUserFunctionEvent;
當執行報表的過程中，當調用的函數不存在，請使用“AddFunction”方法提供自
定義函數。

TfrxDBDataset

TfrxUserDataset

數據存取元件。FastReport使用這些元件讀取及參考數據庫的字段，這兩個
元件都源于 “TfrxDataSet” 并繼承其大部分的功能。

TfrxUserDataSet元件允許構建未連接到數據庫的報表，而由其它來源接收
數(據如:數列、文件等)。在此同時，程序員僅需提供瀏覽此數據集的功能，資料
接收并非由此元件執行，而是用其它的方法（例如，經由
“TfrxReport.OnGetValue”事件）。

TfrxUserDataSet 元件有下列的屬性：

property RecNo: Integer readonly;
目前記錄編號，首筆的記錄編號是“ ”
0

property Enabled: Boolean default True;
定義此元件是否可在designer里面使用。

property RangeBegin: TfrxRangeBegin default rbFirst;
數據導航(navigation)的起點。下列的值可以使用：
rbFirst – 從數據的第一筆記錄開始。
rbCurrent – 從當前的記錄開始。
property RangeEnd: TfrxRangeEnd default reLast;
數據導航(navigation)的起點。下列的值可以使用：
reLast – 直到數據結束。
ReCurrent – 直到目前的記錄。
reCount – 依“RangeEndCount” 屬性而定。

property RangeEndCount: Integer;
數據集中的數據個數，此功能只在“RangeEnd”屬性等于 reCount 有效。
property UserName: String;
符號名稱。在報表設計環境(Designer)下，將被顯示于DataSet 的下方。

property OnCheckEOF: TfrxCheckEOFEvent;
TfrxCheckEOFEvent=procedure(Sender:TObject;varEof:Boolean)
of object; 此事件在數據集的尾端時，Eof參數將返回 True。

property OnFirst: TNotifyEvent;
數據集移至第一筆的位置時，會觸發此事件。

property OnNext: TNotifyEvent;
數據集移至下一筆的位置時，會觸發此事件。

property OnPrior: TNotifyEvent;
數據集移至上一筆的位置時，會觸發此事件。

TfrxDBDataSet 元件用來連接以 TDataSet, TTable 及 TQuery 為基類的數
據庫元件，有關數據的導航及字段的參考都是自動的，程序員不需特殊的設定。除
上述屬性外，該元件有下列的屬性：

property CloseDataSource: Boolean default False;
報表創建完成后，關閉數據庫。
property OpenDataSource: Boolean default True;
在報表創建之前打開數據庫。
property FieldAliases: TStrings;
數據集字段的符號名稱別名。
( )
property DataSet: TDataSet; property DataSource:
TDataSource;
連結至 TDataSet 或 TDataSource 類型的元件。
property OnClose: TNotifyEvent;
當關閉數據集時觸發此事件。
property OnOpen: TNotifyEvent;
當打開數據集時觸發此事件

TfrxDesigner
TfrxDesigner 元件是報表設計器，當使用此元件，你的工程文件就可以使
用報表設計器，此元件它只包含一些報表設計器的設定，當加入”frxDesign” 單
元到uses 清單中，就表明與報表設計器連接上了。
此元件包含下列的屬性：

property CloseQuery: Boolean default True;
定義結束設計報表是否詢問儲存報表之用。
property OpenDir: String;
打開報表的預置數據目錄。

property SaveDir: String;
儲存報表的預置數據目錄。

property Restrictions: TfrxDesignerRestrictions;
報表設計環境下，限制不同的報表操作標識 (flag)，此標識包含單一或混合數據
值：
drDontInsertObject – 禁止插入物件
drDontDeletePage – 禁止刪除頁面
drDontCreatePage – 禁止建立新的頁面
drDontChangePageOptions – 禁止修改頁面屬性
drDontCreateReport – 禁止建立新報表
drDontLoadReport – 禁止載入報表
drDontSaveReport – 禁止儲存報表
drDontPreviewReport – 禁止預覽報表
drDontEditVariables – 禁止編輯變量
drDontChangeReportOptions – 禁止修改報表屬性

property OnLoadReport: TfrxLoadReportEvent;
TfrxLoadReportEvent = function(Report: TfrxReport): Boolean of
object;
此事件發生在載入報表之時。利用此事件，你可以從數據庫載入報表。

property OnSaveReport: TfrxSaveReportEvent;
TfrxSaveReportEvent = function(Report: TfrxReport;
SaveAs:Boolean): Boolean of object;
此事件發生在儲存報表之時。利用此事件，你可以將報表儲存于數據庫中。
property OnShow: TNotifyEvent;
此事件發生在啟動報表設計環境時。

TfrxPreview
此元件專供建立自定義報表合預覽窗口使用。

procedure AddPage;
加入空白頁面到報表末端。

procedure DeletePage;
刪除當前頁。

procedure Print;
打印報表。

procedure LoadFromFile;
顯示文件載入窗口。

procedure LoadFromFile(FileName: String);
載入指定的文件。

procedure SaveToFile;
顯示文件儲存窗口。

procedure SaveToFile(FileName: String);
儲存文件到指定的文件名稱。

procedure Edit;
載入當前頁至設計模式供編輯使用。

procedure Export(Filter: TfrxCustomExportFilter);
使用指定的導出過濾器導出報表。

procedure First;
第一頁。

procedure Next;
下一頁。

procedure Prior;
上一頁。

procedure Last;
最后一頁。
procedure PageSetupDlg;
顯示頁面設定窗口。

procedure Find;
顯示文字搜尋窗口。

procedure FindNext;
繼續找下一個。

procedure Cancel;
取消創建報表。

procedure Clear;
清除報表。

你可以使用下列屬性：
property PageCount: Integer readonly;
報表頁數。

property PageNo: Integer;
目前報表頁碼起始值為。要移至其它頁面，指定此屬性的值即可。
( 1)

property Tool: TfrxPreviewTool;
選取工具。

property Zoom: Extended;
顯示比例，“1” 代表 100% 。

property ZoomMode: TfrxZoomMode;
顯示模式，可以的顯示模式如下：
zmDefault – 預置值，顯示比例根據“Zoom” 屬性而定
zmWholePage – 整頁模式
zmPageWidth – 與頁面寬度相同
zmManyPages – 一屏顯示多頁

property OutlineVisible: Boolean;
是否顯示報表大綱樹狀結構。

轉載于:https://blog.51cto.com/kaixinbuliao/892554

總結

以上是生活随笔為你收集整理的fastreport(A)的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。

FastReport