C++代码转换成Delphi

Question

例如在C++中定义:
type struct tagREPORT 
{
  int m_type;
} REPORT typedef struct tagDATA
{
  int m_wDataType;
  union
  {
   REPORT * m_pReport;
  };
} DATA
在Delphi对应应该定义成什么呢？

Answer 1

type
  REPORT = record
    m_type: integer;
  end;  pREPORT = ^REPORT;
  data = record
    a:record
     case integer of
        0: (m_wDataType: integer);
        1: (m_pReport: pREPORT);
    end;
  end;