Código Delphi [-]Procedure TForm1.button1click(sender : TObject); Begin // aqui podes invocar a sender sin problemas! if Sender is TButton Then ShowMessage('botón'); end;
Procedure TForm1.button1click(sender : TObject); Begin // aqui podes invocar a sender sin problemas! if Sender is TButton Then ShowMessage('botón'); end;