Onclick mit weiteren Parametern als nur "Sender:Tobject"

**Dt2158**

Hallo,

ich habe folgendes Problem:
Ein zur laufzeit erzeugter button "but1"

Delphi-Quellcode:

			type

...

procedure But1Click(Sender: TObject);

 private

...

...

...

...

but1.onclick := But1Click;

..

..

procedure TForm1.But1Click(Sender: TObject);

begin

...

end

Geht einwandfrei, klar!
aber ich möchte gerne die Parameterliste erweitern

etwa so:

zusammenfalten · markieren

Delphi-Quellcode:

			type

...

procedure But1Click(Sender: TObject; x:string);

 private

...

...

...

...

but1.onclick := But1Click('irgendein string');

..

..

procedure TForm1.But1Click(Sender: TObject; x:string);

begin

...

end

Da kommt die meldung:

markieren

Code:

[Fehler] main.pas(289): Inkompatible Typen: 'TObject' und 'String'

gut sender:Tobject !!
was kann ich tun ??
aus dem
but1.onclick := But1Click('irgendein string'); ein but1.onclick := But1Click(but1,'irgendein string'); zu machen, resultiert in diesem fehler

markieren

Code:

			[Fehler] main.pas(289): Inkompatible Typen: 'TNotifyEvent' und 'procedure, untyped pointer or untyped parameter'
		

Dt2158

Onclick mit weiteren Parametern als nur "Sender:Tobject"

Onclick mit weiteren Parametern als nur "Sender:Tobject

Forumregeln