Acceder a las propiedades de un botón en un método compartido por varios botones

[modulay]

Tengo varios botones en mi form.
Para el evento OnClick tengo un único método común para todos ellos,y quisiera saber como puedo acceder a las propiedades del botón que se haya pulsado,dentro del método...en concreto me interesa acceder a la propiedad "Tag" para saber de qué botón se trata en cada caso.
Gracias

[dec]

Hola,

Fíjate en el parámetro "sender", que es quien se "envía" en el evento. Podrías hacer algo como:

Código Delphi [-]
var
  miTag: integer;
begin
  if (sender is TButton) then
    miTag := TButton(sender).Tag;  
end;

[modulay]

Anda perfecto.
Gracias dec!

[Paoti]

este es una de las cosas que me encantan de Delphi y que no le he sacado partido.