Eigenes Objekt welches TLabel, TImage nutzt

[hedie]

Zitat von Sir Rufo:

siehe TNotifyEvent

Danke, das habe ich bereits versucht:

Delphi-Quellcode:

type TmyObject = class(TPanel)
  private
    ...
    FOnButtonClick:TNotifyEvent;
  public
    property OnButtonClick: TNotifyEvent read FOnButtoClick write FOnButtoClick;
    ...
end;

...

procedure MeineFunktion;
begin
  ShowMessage(inttostr(Form1.test.ButtonActive));
end;

...

var
  test:TmyObject
...
  test.onButtonClick := MeineFunktion;

Dies gibt mir eine Fehlermeldung:

"Inkompatible Typen: Methodenzeiger und reguläre Prozedur"