高手给我翻译下 简单的代码 CBuilder 翻译为 Delphi 主要是结构体问题(300分)

高手给我翻译下 简单的代码 CBuilder 翻译为 Delphi 主要是结构体问题
/=========================================
声明 是这样
typedef short apiStatus;
//
struct TagIds
{
unsigned char TagType;
unsigned char AntNum;
unsigned char Ids[12];
};
TagIds IdBuf[8];

extern "C" apiStatus __stdcall IsoMultiTagIdentify(HANDLE hCom, unsigned int * Count,TagIds *value, unsigned char ReaderAddr);//

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
调用
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
if(IsoMultiTagIdentify(hComHandle,&Cnt,IdBuf,0xff)==0)
{
mem->Lines->Add("读卡成功！！！");

mem->Lines->Add(IntToStr(Cnt));
}
}

帮顶一个，顺便发个交流群：delphi天堂群：4654765

以上是C Builder 的代码 我想要 Delphi 的

C++ Builder 转 Delphi 自己来不行吗？

要是行 我何苦呢

type
apiStatus = SmallInt;
type
TagId = record
TagType: Byte;
AntNum: Byte;
Ids: Array[0..12-1] of Byte;
end;

TagIds = array[0..7] of TagId;
function IsoMultiTagIdentify(hCom: THandle;
var Count: Word;
var value: TagIds;
ReaderAddr: Byte): apiStatus;
stdcall;