OnChange bei programmierten Komponenten?

[Christian Seehase]

Moin Hobbyloser,

der Aufbau, also die Parameter müssen übereinstimmen.
Was Du dann in der Prozedur machst spielt keine Rolle.

TNotifyEvent ist ja so deklariert:

type TNotifyEvent = procedure (Sender: TObject) of object; Ergo: Die Methode muss eine Prozedur sein, und genau einen Parameter vom Typ TObject haben.

Du könntest also schreiben:

Delphi-Quellcode:

TForm1 = class(TForm)
//...
  procedure MeineClickRoutine(MeinParameter : TObject);
//...
end;

var
  Form1: TForm1;
  MeinButton : TButton;

implementation
 
procedure TForm1.MeineClickRoutine(MeinParameter : TObject);
begin
  ShowMessage('Hallo');
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  MeinButton := TButton.Create(self);
  MeinButton.OnClick := MeineClickRoutine;
end;