Ver Mensaje Individual
  #2  
Antiguo 12-09-2007
Avatar de dec
dec dec is offline
Moderador
 
Registrado: dic 2004
Ubicación: Alcobendas, Madrid, España
Posts: 13.141
Reputación: 36
dec Tiene un aura espectaculardec Tiene un aura espectacular
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;
__________________
David Esperalta
www.decsoftutils.com
Responder Con Cita