c++ - 将复杂的结构/不透明指针/函数从 C++ 头文件转换为 Delphi

Question

我正在从 C/C++ header 转换为 Delphi。我仔细阅读了伟大的 Rudy's Delphi Corner关于这种转换的文章。不管怎样，我正面临着一些我难以理解的事情。

有一个不透明的指针，然后是一个将该指针作为参数的函数原型(prototype)，然后是结构声明和函数类型。

也许代码会让事情变得更清楚。

源.h代码:

struct my_ManagedPtr_t_;
typedef struct my_ManagedPtr_t_ my_ManagedPtr_t;

typedef int (*my_ManagedPtr_ManagerFunction_t)(
                                            my_ManagedPtr_t *managedPtr,
                                            const my_ManagedPtr_t *srcPtr,
                                            int operation);

typedef union {
    int   intValue;
    void *ptr;
} my_ManagedPtr_t_data_;

struct my_ManagedPtr_t_ {
    void *pointer;
    my_ManagedPtr_t_data_ userData[4];
    my_ManagedPtr_ManagerFunction_t  manager;
};

typedef struct my_CorrelationId_t_ {
    unsigned int  size:8;       // fill in the size of this struct
    unsigned int  valueType:4;  // type of value held by this correlation id
    unsigned int  classId:16;   // user defined classification id
    unsigned int  reserved:4;   // for internal use must be 0

    union {
        my_UInt64_t      intValue;
        my_ManagedPtr_t  ptrValue;
    } value;
} my_CorrelationId_t;

...我迷路了。 :-( 我不知道从哪里开始。结构？功能？

谢谢。

Answer 1

正如您在评论中澄清的那样，您最容易感到困惑的地方是循环引用。函数指针参数引用结构体，但结构体包含函数指针。在 C 代码中，这是由不透明的结构类型声明处理的，它只是一个前向声明。前向声明只是 promise 该类型将在稍后的某个时间点被完全声明。

在 Delphi 中，您可以直接以类似的方式处理这个问题。您需要使用前向类型声明。我不想翻译您问题中的所有类型，因为这需要处理我认为是独立主题的 union 和位域。相反，我将提供一个简单的 Delphi 示例，展示如何处理此类循环类型声明。您可以采用该概念并将其应用于您的特定类型。

type
  PMyRecord = ^TMyRecord; // forward declaration
  TMyFunc = function(rec: PMyRecord): Integer; cdecl;
  TMyRecord = record
    Func: TMyFunc;
  end;