2

这是我需要转换delphi的代码:

LPBYTE readCharBuff = NULL;
BYTE readBuffSize;

readCharBuff = new BYTE[200];
readBuffSize    = 200;

readCharBuff[readBuffSize] = '\0';

谢谢你的帮助

4

1 回答 1

1

这是一个字面翻译:

var
  readCharBuff: PByte; 
  readBuffSize: Byte; 

.

readCharBuff := nil; 

GetMem(readCharBuff, 200); 
readBuffSize := 200; 

readCharBuff[readBuffSize] := $0; 
于 2012-09-27T21:20:14.837 回答