C++转delphi代码

 memset(&m_struResult, 0, sizeof(m_struResult));
          m_struResult.pBuffer1 = new BYTE[2 * 1024 * 1024];
     memset(m_struResult.pBuffer1, 0, 2 * 1024 * 1024);
    if (!NET_DVR_ManualSnap(m_lServerID, &m_struManualSnap, &m_struResult)))

 

 

C++中以上语名，在DELPHI中翻译为：

 FillChar(m_struResult,SizeOf(NET_DVR_PLATE_RESULT),#0);

   FillChar(m_struManualSnap,SizeOf(NET_DVR_MANUALSNAP1),#0);
       GetMem(m_struResult.pBuffer1,2 * 1024 * 1024);
    FillChar(m_struResult.pBuffer1^,2 * 1024 * 1024,#0);

      if (not NET_DVR_ManualSnap(lUserID, @m_struManualSnap, @m_struResult)) then

 if m_struResult.pBuffer1 <> nil then
     begin
        FreeMem(m_struResult.pBuffer1,2 * 1024 * 1024);
        m_struResult.pBuffer1 := nil;
     end;