OnClick zuweisung schlägt fehl...

[Teekeks]

Hi!
Ich hab schonwieder eine Frage. Ich finde absolut keine Lösung...
Ich will in einem Array of TButton die OnClick Property zuweisen. Das tuhe ich volgendermaßen:

Delphi-Quellcode:

procedure TButtons.SetClick(X: integer; ClickProcedure:TNotifyEvent);
begin
  FX:=X;
  FButtonList[FX].OnClick:=ClickProcedure;
end;

Ich habe eine Procedure namens "Buttons1Click(Sender:TObject)" und würde jetzt gerne sohier:

Delphi-Quellcode:

var Buttons:TButtons;
{...}  
Buttons.SetClick(Buttons1Click(Sender));

Die Procedure zuweisen. ich kriege aber folgende Fehlermeldung:

Zitat von Lazarus:

Incompatible type for arg no. 2:Got "untyped",expected "<procedure variable type of procedure(TObject) of object;Register>

Wisst ihr was ich falsch mache?

gruß Teekeks