华视cvr-100UC 二代身份证读卡通用函数

最新推荐文章于 2023-12-08 15:44:13 发布

trassion

最新推荐文章于 2023-12-08 15:44:13 发布

阅读量8.7k

点赞数

分类专栏： delphi

本文链接：https://blog.csdn.net/Trassion/article/details/70255887

版权

本文介绍了如何使用华视cvr-100UC读取二代身份证信息的函数，包括姓名、性别、生日、地址等关键字段的解析方法，并提供了读卡和解码的基本步骤。

摘要由CSDN通过智能技术生成

本方法只针对的是华视cvr-100UC 二代身份证读卡。

只是写了主要的部分，可以把函数等放入公共文件中，引用，调用即可。剩下的自己琢磨吧！

先定义个机构：

TPsnMsg = record
    PeoName:           string;    //姓名
    PeoSex:            string;    //性别
    PeoFolk:           string;    //
    PeoBirthday:       string;    //生日
    PeoAddress:        string;    //地址
    PeoIDNumber:       string;    //身份证号
    PeoDepartment:     string;    //发证机关
    PeoStartDate:      string;    //起止日期
    PeoEndDate:        string;
    PeoReserve:        string;
    paddaddress1:      string;
    m_szphoto:         array [0..1023]             of char;
end;

以下是函数：

function GetPsnMsg_100UC(iPort:integer):TPsnMsg;

var
iRet, iTimeOut :integer;
TimeCurr, TimeDelay:int64;

iFileHandle,iFileLength: Integer;
Buffer: PWideChar;

sWZ :WideString;