Código Delphi [-]MiArrray[TMIImagen(Sender).Tag] := cualqueir cosa
MiArrray[TMIImagen(Sender).Tag] := cualqueir cosa