Eelent aus Array of TShape ereignis zuweisen

[Real_Thunder]

Hallo an alle.

Ich versuche Gerade ein Programm zu schrieben, das Bilder archiviert..

und um einige Bilder auswählen zu können... bzw, damit es besser aussieht, habe ich
shapes um die bilder herum gesetzt

da die bildanzahl, die die suche ausgibt immer varible ist
habe ich die bilder, sowohl auch die Shapes als Array Angelegt, dessen Elemente dann mit hilfe einer schreife erstellt, positioniert, skaliert.. etc etc werden


nun möchste ich aber auch noch das in der schleife die Ereigneisse mit aufgenommen werden

beimouseclick => shape soll blau werden...

nun habe ich keinen blassen schimmer, wie ich es anstellen soll.....
habe es mit:
Shape_Array[a].onMouseDown:=MarkShape(a); versucht, wobei markshape eine procedure ist....

Könnte mir da jemand weiterhelfen ?