Die Methode ReadBla ist innerhalb des Objektes definiert, also existiert ja ein Objekt.
@mleyen ja das könnte vlt funktionieren aber ich sehe gerade das
die Zuweisung
AStringList.AddObject('Bla', ARead);
nicht funktioniet. ARead ist für ihn kein Objekt.
Habe ARead nach dem new Beispiel folgendermaßen definiert
Delphi-Quellcode:
TReadMethod = function(A, B : TObject) : boolean of object;
PReadMethod = ^TReadMethod
...
var
ARead : PReadMethod
Wenn das Meer unruhig ist und der Wind die Wellen treibt, erfreut es, vom Strand aus die Mühen eines Anderen zu beobachten.