Wie sieht die Callback aus und was kann man der Aufruffunktion an zusätzlichen Parametern übergeben ?
Ideal wäre
Delphi-Quellcode:
type
TCallback = function(UserData: Pointer; .....): ....; stdcall;
procedure EnumXYZ(..., UserData: Pointer; Callback: TCallback);
D.h. die besten Callbacks benutzen als 1. Parameter in der Callback einen Benutzerdefinierten Zeiger/Integer etc. Dann ist es einfach diesen als Self vom Object zu benutzen, sprich so:
Delphi-Quellcode:
type
TMyObject = class
funtcion Callback(.....): ....; stdcall;
end;
Als UserData wird Self übergeben, und die Callback Methode lässt diesen einfach weg.
Gruß Hagen