FastReport VCL報表工具事件處理程式描述

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

TfrxEditControl = class(TfrxDialogControl)
 private
 FEdit: TEdit;
 { new event }
 FOnChange: TfrxNotifyEvent;
 procedure DoOnChange(Sender: TObject);
 …
 public
 constructor Create(AOwner: TComponent); override;
 …
 published
 { new event }
 property OnChange: TfrxNotifyEvent read FOnChange write FOnChange;
 …
 end;constructor TfrxEditControl.Create(AOwner: TComponent);
 begin
 …
 { connect our handler }
 FEdit.OnChange := DoOnChange;
 InitControl(FEdit);
 …
 end;procedure TfrxEditControl.DoOnChange(Sender: TObject);
 begin
 { call event handler }
 if Report <> nil then
 Report.DoNotifyEvent(Sender, FOnChange);
 end;