Prüfen, ob eine Klasse eine bestimmte Methode enthält

[Christian18]

Hallo,

wie kann ich prüfen, ob eine Klasse eine bestimmte Methode enthält oder nicht?

Delphi-Quellcode:

if FindMethod(ClassName, MethodName) then
  begin
    // Ja
  end
else
  begin
    // Nein
  end;


function FindMethod(ClassName: TClass; MethodName: TMethod) : Boolean;
begin
  // ???
end;

MFG Christian18