고수님들의 도움을 부탁드립니다.

C Builder 에서 작성한 코드를 Delphi용으로 변환해야 합니다.
구조체때문에 헤메고 있습니다.

부탁드립니다.

typedef struct tagPACKET
{
BYTE    Net;
BYTE    Dev;
WORD    Pid;
WORD    Size;
BYTE    Data[128];
BYTE    Sop;
BYTE    Addr;
WORD    Sum;   
} PACKET;



typedef struct tagLOGINPOLL
{
BYTE TempByte;
BYTE LoginType;
BYTE Id[16];
BYTE Passwd[16];
BYTE ProcPrg;
DWORD CardNo;
} LOGINPOLL;


PACKET* sPacket = new PACKET;
LOGINPOLL* sRecord = (LOGINPOLL*)sPacket->Data;

sPacket->Pid = 1L;
sPacket->Size = sizeof(LOGINPOLL);

sRecord->ProcPrg = 1;
sRecord->LoginType = 1;
strcpy(sRecord->Id, Id.c_str());
strcpy(sRecord->Passwd, Pwd.c_str());
Socket->SendBuf(sPacket, sizeof(PACKET));

delete sPacket, sRecord;