dynamische Timage onclick

[simonko]

Ich hab jetzt Timages zur laufzeit erstellt in einer prozedur;

Delphi-Quellcode:

      s:=stacktostring(p);
      form1.bild[i]:= TImage.Create(form1);
      form1.bild[i].Parent:=form1;
      form1.bild[i].Left:=100+(i*20);
      form1.bild[i].Top:=250;
      form1.bild[i].Width:=60;
      form1.bild[i].Height:=90;
      form1.bild[i].Picture.LoadFromFile('C:\'+s+'.JPG');
      form1.bild[i].Visible:=true;

jetzt möcht ich aber dass jedes bild bei onclick etwas anderes macht. kann ich dass da noch irgendwie zuweisen? Ich bräuchte das s : string dass zu jeden bild zugewiesen wordn ist und es soll dann eine prozedur aufrufen die für jeden gleich ist. ich muss eigentlich nur den namen des bildes wissen.

vor allem versteh ich nicht wo ich das onclick reinschreiben muss. denn bei normalen Timage gibts ja die events onclick. aber bei diesen ist das etwas anders.. ich kenn mich nicht so aus


bitte um hilfe
MFG