delphi - 将C++回调函数导入delphi

Question

这是此函数的 C++ 头文件。我已经导入了所有东西，除了那个回调我不知道该怎么做。

struct abs_operation;

typedef struct abs_operation ABS_OPERATION;  /* forward declaration */

typedef void (BSAPI  *ABS_CALLBACK) ( const ABS_OPERATION*, ABS_DWORD, void*);

struct abs_operation {
        ABS_CALLBACK Callback;  ///< Pointer to application-defined function, implementing operation callback.
} ;

Answer 1

根据对您之前问题的了解，我认为是这样的：

type
  PABSOperation = ^TABSOperation;
  TABSCallback = procedure(const Operation: PABSOperation;
     Flags: DWORD; Ptr: Pointer); stdcall;
  TABSOperation = record
     Callback: TABSCallback;
  end;