Obtener Tag de un timage

[DaHousecat]

Bueno el punto es este, tengo 10 Timage con diferentes nombres y les he asociado el mismo evento clic a todos.

Lo que deseo hacer (no se si es posible) es sacar el tag del timage cuando le den clic, como dije 10 timage comparte el mismo evento clic, entonces cada uno de los 10 timage tienen un tag diferente.

hice algo asi:

procedure TForm1.All2Click(Sender: TObject);
var fileName:String;
begin
       fileName:=inttostr(Self.tag)+'.jpg';
       comparar(fileName);
end;

Pero eso me devuelve el tag del Form, y no del boton que esta invocando el evento.

Hay alguna manera de saber el tag del elemento que esta invocando el evento clic?, ¿tomando en cuenta que esta asociado a varios?

[[ArdiIIa]]

Hola DaHousecat, Bienvenido.

Código Delphi [-]
procedure TForm1.All2Click(Sender: TObject);
var fileName:String;
begin
       fileName:=inttostr( TImage(Sender).Tag)+'.jpg';
       comparar(fileName);
end;

[DaHousecat]

Gracias Ardilla me sirvió de lujo... es medio complicado esto de ser novato, no me acostumbro a la sintaxis y formas de hacer las cosas T_T

Tengo otra preguntita (si ya se que soy molesto U_U) sabiendo que las tags son diferentes para todos, ¿como puedo hacer referencia directa a un TImage usando su tag asociada?

¿Podrían recomendarme donde leer acerca de esto? la verdad que me da pena estar molestando pero es que no se ni como buscar en google T_T