Saber a que procedimiento se llama en el evento de un objeto

[APO]

Empezado por roman

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.