请帮忙翻译下VC代码到delphi(100)

BYTE bCIDBuff[CID_BUFFER_MAX_LEN]; INT nLength=0; BYTE bNameBuf[CID_NAME_BUF_MAX_LEN]; INT nNameLen=0; int i; memset(bCIDBuff,0x0,sizeof(bCIDBuff)); memset(bNameBuf,0x0,sizeof(bNameBuf)); nLength = pWJ_ReadCallID(bCIDBuff); nNameLen = pWJ_ReadCIDName(bNameBuf); if (nLength) { for( i=0 i<nLength i++) { m_strCode += bCIDBuff; m_strCode += " "; } for( i=0 i<nNameLen i++) { m_strCode += bNameBuf; m_strCode += " "; } }帮忙翻译成delphi的typedef INT (*WJ_ReadCallID) (BYTE *bCallIDBuffer = NULL);typedef INT (*WJ_ReadCIDName) (BYTE *bCIDNameBuffer = NULL);WJ_ReadCallID=pWJ_ReadCallID

自己搞定了，在vc中byte定义的在delphi中用array of char来处理就行了。

拿分。。。。。。

接受答案了.