这样的声明如何转换

Question

typedef struct tagCHAROCRINFO { 
 int  nArea, nIndex;    
 BOOL bTrue;     
 WORD pCand[10];    
 WORD uWidth, uHeight;   
 BYTE pDotMatrix[2048];   
} CHAROCRINFO, *PCHAROCRINFO; bool WINAPI FpGetCharOCRInfo(PCHAROCRINFO lpCharInfo); 
有人问我这个如何转Delphi声明  

Answer 1

PCHAROCRINFO = ^tagCHAROCRINFO;
tagCHAROCRINFO = packed record
  nArea, nIndex: integer;
  bTrue: Boolean;
  pCand: array[0..9] of word;
  uWidth, uHeight: word;
  pDotMatrix: array[0..2047] of byte;
end;