帮我把这段C++代码翻译成Delphi谢谢

Question

BYTE ucIndex;
BYTE UcCRC8 = 0;
ucIndex = ucCRC8 ^ (* ucpData ++);
小弟delphi不精，十分感谢！

Answer 1

还有
BYTE * ucpData嘿，差点忘了，不好意思！

Answer 2

我自己是这样理解的，但是编译通不过因为ucpData是一个数组，是不能直接加1的，请大家帮忙！
ucIndex:=ucCrc8 xor (ucpData+1);

Answer 3

BYTE *ucpData;
var
  ucpData:^Byte(*PByte*);
BYTE ucIndex; 
BYTE UcCRC8 = 0; 
ucIndex = ucCRC8 ^ (* ucpData ++);var
  ucIndex,UcCRC8:Byte;
...
  UcCRC8 := 0;
  ucIndex := UcCRC8 xor (ucpData^);
  Inc(ucpData);