OnChange-Ereignis für eigene Komponente?

[DeddyH]

Delphi-Quellcode:

type 
  TDeineKompo = class(TCustomControl)
  private
    FOnChange: TNotifyEvent;
    ...
  published
    property OnChange: TNotifyEvent read FOnChange write FOnChange;
    ...
  end;

...

procedure TDeinKompo.AusloesendeRoutine;
begin
  ...
  if Assigned(FOnChange) then
    FOnChange(self);
end;