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

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

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

  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 – 清除對象內容并刪除其所有子對象。
• CreateUniqueName – 為放置在報告中的對象創建唯一名稱。
• LoadFromStream – 從流中加載對象內容及其所有子對象。
• SaveToStream – 將對象保存到流中。
• SetBounds – 設置對象坐標和大小
• FindObject – 在子對象中搜索具有指定名稱的對象。
• GetDescription – 返回對象的描述。

• SetParent
• SetLeft
• SetTop
• SetWidth
• SetHeight
• SetFont
• SetParentFont
• SetVisible
• FontChanged

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

  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;

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

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

  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;

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

TfrxViewclass 是大多數組件的基本類，可以放在報表設計頁面上。這種類型的對象具有框架和填充等參數，也可以連接到數據源。大多數 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- 從方法中調用Draw方法并計算整數值坐標和繪圖區域大小。計算值表示為FX，FY，FX1，FY1，FDX，和FDY變量。FFrameWidth還計算框架寬度（放置在 中）；
• DrawBackground - 繪制對象背景；
• DrawFrame - 繪制對象框架；
• DrawLine – 繪制具有指定坐標和寬度的線；
• IsDataField如果DataSet和DataField屬性包含非空值，則返回“True” 。

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

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

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

• CalcHeight 是根據放置在其中的數據計算并返回對象高度；
• InitPart 在對象拆分之前調用；
• DrawPart重繪放置在對象中的下一個數據塊。“返回值”是無法顯示數據的未使用空間的值。

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

還想要更多嗎？您可以點擊閱讀【FastReport報表2021最新資源盤點】，查找需要的教程資源。上是FastReport .NET正在慧都網火熱銷售中！>>查看價格詳情