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;