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

[roman]

Empezado por APO

Si existiese la instrucción, sería saber algo así:

if btnAceptar.OnClick.Name = 'ConfigurarForm' then ...

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