delphi 二代身份证阅读器 SDT_ReadBaseMsg()读取到的照片数据进行处理问题

SDT_ReadBaseMsg(1001,@pucCHMsg,puiCHMsgLen,@pucPHMsg,puiPHMsgLen,1);//获取读卡数据  pucCHMsg 文字信息（unicode编码，需转换一下），pucPHMsg 照片信息

下面就取出的照片字节数据信息处理做如下说明:

var

   InPicMS  : TMemoryStream;

照片自己数据处理，先将字节数据转换成.wlt文件，再运用GEtBmp函数将.wlt文件转换成bmp文件。

    

    InPicMS := TMemoryStream.Create;
    InPicMS.WriteBuffer(pucPHMsg[0],puiPHMsgLen );
    InPicMS.SaveToFile('C:\headtest.wlt');
    nRet := GetBmp('C:\headtest.wlt', 2);  //返回值 1正确
    //showmessage(inttostr(nRet));
    InPicMS.Free;