Vc代码转Delphi代码的问题!急，在线等待！

///////////////////VC的数据结构
typedef struct tagRCV_REPORT_STRUCTEx
{
WORD m_cbSize; // 结构大小
time_t m_time; // 交易时间
WORD m_wMarket;// 股票市场类型
char m_szLabel[STKLABEL_LEN];// 股票代码,以'\0'结尾
char m_szName[STKNAME_LEN];// 股票名称,以'\0'结尾
float m_fLastClose;// 昨收
float m_fOpen; // 今开
float m_fHigh;// 最高
float m_fLow;// 最低
float m_fNewPrice;// 最新
float m_fVolume;// 成交量
float m_fAmount;// 成交额
float m_fBuyPrice[3];// 申买价1,2,3
float m_fBuyVolume[3];// 申买量1,2,3
float m_fSellPrice[3];// 申卖价1,2,3
float m_fSellVolume[3];// 申卖量1,2,3
float m_fBuyPrice4;// 申买价4
float m_fBuyVolume4;// 申买量4
float m_fSellPrice4;// 申卖价4
float m_fSellVolume4;// 申卖量4} RCV_REPORT_STRUCTEx, *PRCV_REPORT_STRUCTEx;////////////////////////////VC的代码int nBufSize = pHeader->m_pReport[0].m_cbSize;
PBYTE pBaseBuf = (PBYTE)&pHeader->m_pReport[0];for(i=0; i<pHeader->m_nPacketNum; i++)
{
RCV_REPORT_STRUCTEx & Buf = *(PRCV_REPORT_STRUCTEx)(pBaseBuf + ufSize*i );
//////////不知这句Delphi如何写??????????????????
}