Verflixt, geht auch nicht.
Die Procedure in der
unit wird jetzt akzeptiert.
Delphi-Quellcode:
procedure BeforeLoadProc(
const Arg: TData);
begin
//
end;
Bei der Übergabe
LoadData(BeforeLoadProc);
bekomme ich jetzt die Meldung: Inkompatible Typen: System.Sysutils.TProc<TData> und Procedure.
Die aufrufende Procedure ist so definiert:
procedure LoadData(const BeforeLoad: TProc<TData> = nil)