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

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

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;

Anda perfecto.
Gracias dec!

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