Ver Mensaje Individual
  #5  
Antiguo 14-06-2011
APO APO is offline
Miembro
 
Registrado: feb 2008
Posts: 129
Reputación: 19
APO Va por buen camino
Cita:
Empezado por roman Ver Mensaje
A ver, intenta así:


Código Delphi [-]
var
Method: TMethod;

begin
Method := TMethod(btnAceptar.OnClick);
if Method.Code = @TForm1.ConfigurarForm then
ShowMessage('Mi evento OnClick es ConfigurarForm');
end;





// Saludos
CORRECTO!

Muchas gracias Roman! Eso es justamente lo que quería. Y con el código que has puesto funciona perfectamente. Eres un crack!

Gracias a todos por vuestro tiempo. Un saludo.
Responder Con Cita