标签 flags 下的文章

Delphi翻译Api头文件时的一个坑

typedef enum _EVT_RENDER_FLAGS
{
    EvtRenderEventValues = 0,           // Variants
    EvtRenderEventXml,                  // XML
    EvtRenderBookmark                   // Bookmark

 } EVT_RENDER_FLAGS;
  EVT_RENDER_FLAGS = (EvtRenderEventValues = 0,
    EvtRenderEventXml = 1,
    EvtRenderBookmark = 2);


DWORD      Flags    //Windows SDK的定义

翻译成Delphi的时候一定也要定义成对应的数据类型千万别

Flags:EVT_RENDER_FLAGS;

不然 32Bit的时候正常 但是64Bit程序的时候 sizeof(EVT_RENDER_FLAGS)  =  1