午夜视频,国产爽一爽,日韩欧美另类在线

FastReport VCL開發(fā)人員手冊：FastReport 類層次結(jié)構(gòu)

翻譯|使用教程|編輯：楊鵬連|2021-06-28 09:42:34.010|閱讀 258 次

概述：FastReport VCL它提供了可視化模板設(shè)計器，可以訪問 30 多種格式，并可以部署到云、網(wǎng)站、電子郵件和打印中。本文介紹了FastReport VCL報表類層次結(jié)構(gòu)。

相關(guān)鏈接：

FastReport VCL是用于 Delphi、C++ Builder、RAD Studio 和 Lazarus 的報告和文檔創(chuàng)建 VCL 庫。它提供了可視化模板設(shè)計器，可以訪問 30 多種格式，并可以部署到云、網(wǎng)站、電子郵件和打印中。

立即點擊下載FastReport VCL v6.9最新版

FastReport VCL開發(fā)人員手冊：FastReport 類層次結(jié)構(gòu)

TfrxComponent是所有 FastReport 組件的基類。這種類型的對象具有參數(shù)，例如坐標、大小、字體、可見性和從屬對象的列表。此類還包含允許在流中保存/恢復對象狀態(tài)的方法。

  TfrxComponent = class(TComponent)
  protected
    procedure SetParent(AParent: TfrxComponent); virtual;
    procedure SetLeft(Value: Extended); virtual;
    procedure SetTop(Value: Extended); virtual;
    procedure SetWidth(Value: Extended); virtual;
    procedure SetHeight(Value: Extended); virtual;
    procedure SetFont(Value: TFont); virtual;
    procedure SetParentFont(Value: Boolean); virtual;
    procedure SetVisible(Value: Boolean); virtual;
    procedure FontChanged(Sender: TObject); virtual;
  public
    constructor Create(AOwner: TComponent); override;
    procedure Assign(Source: TPersistent); override;
    procedure Clear; virtual;
    procedure CreateUniqueName;
    procedure LoadFromStream(Stream: TStream); virtual;
    procedure SaveToStream(Stream: TStream); virtual;
    procedure SetBounds(ALeft, ATop, AWidth, AHeight: Extended);
    function FindObject(const AName: String): TfrxComponent;
    class function GetDescription: String; virtual;
    property Objects: TList readonly;
    property AllObjects: TList readonly;
    property Parent: TfrxComponent;
    property Page: TfrxPage readonly;
    property Report: TfrxReport readonly;
    property IsDesigning: Boolean;
    property IsLoading: Boolean;
    property IsPrinting: Boolean;
    property BaseName: String;
    property Left: Extended;
    property Top: Extended;
    property Width: Extended;
    property Height: Extended;
    property AbsLeft: Extended readonly;
    property AbsTop: Extended readonly;
    property Font: TFont;
    property ParentFont: Boolean;
    property Restrictions: TfrxRestrictions;
    property Visible: Boolean;
  end;

Clear – 清除對象內(nèi)容并刪除其所有子對象。
CreateUniqueName – 為放置在報告中的對象創(chuàng)建唯一名稱。
LoadFromStream – 從流中加載對象內(nèi)容及其所有子對象。
SaveToStream – 將對象保存到流中。
SetBounds – 設(shè)置對象坐標和大小
FindObject – 在子對象中搜索具有指定名稱的對象。
GetDescription – 返回對象的描述。

修改相應屬性時會調(diào)用以下方法。如果需要額外的處理，你可以覆蓋它們：

SetParent
SetLeft
SetTop
SetWidth
SetHeight
SetFont
SetParentFont
SetVisible
FontChanged

TfrxComponent類中定義了以下屬性：

Objects – 子對象列表；
AllObjects – 所有從屬對象的列表；
Parent – 鏈接到父對象；
Page – 報告頁面的鏈接，該對象屬于哪個對象；
Report – 報告鏈接，屬于哪個對象；
IsDesigning – “真”，如果設(shè)計器正在運行；
IsLoading – “真”，如果對象正在從流中加載；
IsPrinting – “真”，如果正在打印對象；
BaseName– 對象基本名稱。該值用于CreateUniqueName方法；
Left – 對象 X 坐標（相對于父對象）；
Top - 對象 Y 坐標（相對于父對象）；
Width – 物體寬度；
Height – 物體高度；
AbsLeft – X 對象絕對坐標；
AbsTop – Y 對象絕對坐標；
Font – 對象字體；
ParentFont – 如果“True”，則使用父對象字體設(shè)置；
Restrictions – 一組標志，用于限制一個或另一個對象操作；
Visible – 對象可見性。

下一個基本類是TfrxReportComponent. 這種類型的對象可以放入報表設(shè)計中。這個類包含Draw了對象繪制以及方法BeforePrint/ GetData/AfterPrint方法，這是所謂的報告上運行。

  TfrxReportComponent = class(TfrxComponent)
  public
    procedure Draw(Canvas: TCanvas; ScaleX, ScaleY, OffsetX, OffsetY: Extended); virtual; abstract;
    procedure BeforePrint; virtual;
    procedure GetData; virtual;
    procedure AfterPrint; virtual;
    function GetComponentText: String; virtual;
    property OnAfterPrint: TfrxNotifyEvent;
    property OnBeforePrint: TfrxNotifyEvent;
  end;

繪制對象時調(diào)用 Draw 方法。參數(shù)如下：

Canvas – canvas;
Scale – 按 X 軸和 Y 軸縮放；
Offset - 相對于畫布邊緣偏移。

BeforePrint方法在對象處理之前（在報告構(gòu)建過程中）被調(diào)用。此方法保存對象狀態(tài)。
GetData 調(diào)用方法將數(shù)據(jù)加載到對象中。
AfterPrint在對象處理后調(diào)用。此方法恢復對象狀態(tài)。
TfrxDialogComponent class 是編寫非可視化組件的基礎(chǔ)類，可以放在報表中的對話形式。

  TfrxDialogComponent = class(TfrxReportComponent)
  public
    property Bitmap: TBitmap;
    property Component: TComponent;
  published
    property Left;
    property Top;
  end;

TfrxDialogControl類是編寫通用控件的基礎(chǔ)類，可以放在報表中的對話窗體上。此類包含大多數(shù)常見控件共享的大量常規(guī)屬性和事件。

  TfrxDialogControl = class(TfrxReportComponent)
  protected
    procedure InitControl(AControl: TControl);
  public
    property Caption: String;
    property Color: TColor;
    property Control: TControl;
    property OnClick: TfrxNotifyEvent;
    property OnDblClick: TfrxNotifyEvent;
    property OnEnter: TfrxNotifyEvent;
    property OnExit: TfrxNotifyEvent;
    property OnKeyDown: TfrxKeyEvent;
    property OnKeyPress: TfrxKeyPressEvent;
    property OnKeyUp: TfrxKeyEvent;
    property OnMouseDown: TfrxMouseEvent;
    property OnMouseMove: TfrxMouseMoveEvent;
    property OnMouseUp: TfrxMouseEvent;
  published
    property Left;
    property Top;
    property Width;
    property Height;
    property Font;
    property ParentFont;
    property Enabled: Boolean;
    property Visible;
  end;

在編寫您自己的自定義控件元素時，您應該從此類繼承，將所需的屬性轉(zhuǎn)移到“已發(fā)布”部分，然后為您的公共控件指定新屬性。控制元素的編寫將在下一章詳細討論。

TfrxViewclass 是大多數(shù)組件的基本類，可以放在報表設(shè)計頁面上。這種類型的對象具有框架和填充等參數(shù)，也可以連接到數(shù)據(jù)源。大多數(shù) FastReport 標準對象都是從這個類繼承而來的。

  TfrxView = class(TfrxReportComponent)
  protected
    FX, FY, FX1, FY1, FDX, FDY, FFrameWidth: Integer;
    FScaleX, FScaleY: Extended;
    FCanvas: TCanvas;
    procedure BeginDraw(Canvas: TCanvas; ScaleX, ScaleY, OffsetX, OffsetY: Extended); virtual;
    procedure DrawBackground;
    procedure DrawFrame;
    procedure DrawLine(x, y, x1, y1, w: Integer);
  public
    function IsDataField: Boolean;
    property BrushStyle: TBrushStyle;
    property Color: TColor;
    property DataField: String;
    property DataSet: TfrxDataSet;
    property Frame: TfrxFrame;
  published
    property Align: TfrxAlign;
    property Printable: Boolean;
    property ShiftMode: TfrxShiftMode;
    property TagStr: String;
    property Left;
    property Top;
    property Width;
    property Height;
    property Restrictions;
    property Visible;
    property OnAfterPrint;
    property OnBeforePrint;
  end;

此類中定義了以下方法：

BeginDraw- 從方法中調(diào)用Draw方法并計算整數(shù)值坐標和繪圖區(qū)域大小。計算值表示為FX，F(xiàn)Y，F(xiàn)X1，F(xiàn)Y1，F(xiàn)DX，和FDY變量。FFrameWidth還計算框架寬度（放置在中）；
DrawBackground - 繪制對象背景；
DrawFrame - 繪制對象框架；
DrawLine – 繪制具有指定坐標和寬度的線；
IsDataField如果DataSet和DataField屬性包含非空值，則返回“True” 。

調(diào)用BeginDraw方法后可以參考以下屬性：

FX, FY, FX1, FY1, FDX, FDY,FFrameWidth是根據(jù)Scale和Offset參數(shù)計算的對象框坐標、大小和寬度；
FScaleX,FScaleY是尺度，它們是Draw方法中 ScaleX 和 ScaleY 參數(shù)的副本；
FCanvas是畫布，它是Draw方法中 Canvas 參數(shù)的副本。

在此類中定義了以下屬性，這些屬性對于大多數(shù)報表對象是通用的：

BrushStyle – 對象填充樣式；
Color – 對象填充顏色；
DataField - 數(shù)據(jù)字段名稱，連接到哪個對象；
DataSet - 數(shù)據(jù)源;
Frame – 對象框架；
Align - 對象相對于其父對象對齊；
Printable – 定義是否應打印給定對象；
ShiftMode 當可拉伸對象放置在給定對象上時，是對象移動模式；
TagStr - 用戶信息存儲字段。

TfrxStretcheable class 是編寫組件的基本類，它根據(jù)放置在其中的數(shù)據(jù)修改它們的高度。

  TfrxStretcheable = class(TfrxView)
  public
    function CalcHeight: Extended; virtual;
    function DrawPart: Extended; virtual;
    procedure InitPart; virtual;
  published
    property StretchMode: TfrxStretchMode;
  end;

給定類的對象可以被拉伸，也可以在對象在輸出頁面上找不到空間的情況下“分解”成碎片。同時，對象被零散地顯示，直到顯示其所有數(shù)據(jù)。
此類中定義了以下方法：