Prozeduraufruf über zur laufzeiterstelltes Objekt

[pepe2502]

with item1 do begin
bildpfad:= 'Bilder/Item1.bmp';
bild:=timage.create(scene);
with bild do begin
name:='Item1bild';
parent:=scene;
{..}
picture.loadfromfile('Bilder/Item1.bmp');
@OnClick:=@inventory.ins_inventar(item1);
end;

end;

Hallo, ich möchte gern wenn man auf das Bild von Item1 klickt eine Prozedur
aus einer anderen unit aufrufen und dieser Item1 übergeben.

---> Fehler: Variable erforderlich??????????

--> Bitte dringend um Hilfe!

--> Was mach ich falsch?

[Sanchez]

Hallo,
Du musst onClick eine Procedure in der Form von TNotifyEvent zuweisen.
Such mal in der OH nach TNotifyEvent, da stehts beschrieben.

Auf alle Fälle muss die Prozedur die Form haben:
procedure EineProzedur(Sender : TObject); grüße, daniel

[EDIT]Die Dereferenzierungsoperatoren (@) musst du weglassen[/EDIT]

[ustra]

Hi,

aus
@OnClick:=@inventory.ins_inventar(item1); mache malOnClick:=inventory.ins_inventar; Die Prozedur ins_inventar muss so deklariert werden:

procedure TFormname.ins_inventar(Sender : TObject); Ulrich

[pepe2502]

Hab ich probiert nur jetzt "kennt" die aufgerufene Prozedure ins_inventar den Gegenstand nicht mehr den ich ihr ja ubergeben wollte????????