Ein OnAfterCreate Event für die eigene Komponente

[dataspider]

Hi,

ich würde sagen, du verwechselst Events und Messages.
Du willst deiner Klasse selbst eine Nachricht schicken. Was willst du damit erreichen?

Willst du einen Event, dann musst du ein Property vom Typ (z.B. TNitifyEvent) deklarieren.

Cu, Frank

[EDIT]

Delphi-Quellcode:

  TmyControl = class(TCustomControl)
  private
    FOnCreate: TNotifyEvent;
  public
    procedure AfterConstruction; override;
  published
    property OnCreate: TNotifyEvent read FOnCreate write FOnCreate;
  end;

implementation

procedure TmyControl.AfterConstruction;
begin
  inherited;
  if Assigned(FOnCreate) then
    FOnCreate(Self);
end;