Procedure-Aufruf mit Reference

[Incocnito]

Ohne jetzt alles im Detail zu prüfen ...
Auch habe ich null Erfahrung mit "reference to X" ...
Aber Im Kommentar steht, dass Get_Company_Details vom Typ TDataRecievedCallback sein soll.
Nur TDataRecievedCallback hat keine Übergabeparameter.
Das dürfte schon das Problem sein.
Die Typen für die Prozeduren/Funktionen, die definiert sind, passen nicht zur Verwendung.

Das geht nicht:

Delphi-Quellcode:

type TMyProc = procedure;

Procedure DoSomething(theProc : TMyProc);
Begin
  theProc('Hallo');
End;

Das geht:

Delphi-Quellcode:

type TMyProc = procedure(const sText : String);

Procedure DoSomething(theProc : TMyProc);
Begin
  theProc('Hallo');
End;

Ich hoffe das hilft schon.

MfG Incocnito