Reguläre Prozedur in Methodenzeiger umwandeln

[DeddyH]

Eine Methode gehört zu einer Klasse. Man löst das Problem also am einfachsten, indem man eine solche mit einer kompatiblen Methode deklariert, instanziert und dann das Event dieser Methode zuweist.

Delphi-Quellcode:

type
  TMyClass = class
  public
    procedure ShowChange(Action: TAction; FileName: string);
  end;

...

Monitor := nil;
MyClass := TMyClass.Create;
try
  Monitor := TDirMonitor.Create('C:\', MyClass.ShowChange);
  ...
finally
  Monitor.Free;
  MyClass.Free;
end;

Sollte so in etwa funktionieren.