Nutzung einer Callback-Funktion innerhalb eines Objekts

[negaH]

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