新中新身份證讀卡器接口api使用手冊-資料下載頁
2025-06-25 02:43本頁面
【正文】 iRet=Syn_OpenPort(iPort)。 if (iRet==0) { iRet=Syn_StartFindIDCard(iPort,pucIIN,ifOpen)。 if (iRet==0) { iRet=Syn_SelectIDCard(iPort,pucSN,ifOpen)。 if (iRet==0) { iRet=Syn_ReadMsg(iPort,0,amp。CardMsg)。 if (iRet==0) { //顯示讀出的信息 UpdateData(true)。 m_name=。 UpdateData(false)。 Syn_SendSound(0)。 Syn_DelPhotoFile()。 } } } }Syn_ClosePort(iPort)。 } 格式。procedure (Sender: TObject)。var ifOpen:integer。 iPort:integer。 iRet:integer。 pucIIN:array[0..3] of Byte。 pucSN:array[0..7] of Byte。 CardMsg:TCard。begin IfOpen:=0。 //是否需要打開串口 iPort:=1。 iRet:=Syn_OpenPort(iPort)。 if iRet0 then begin Syn_ClosePort(iPort)。 Exit。 end。 iRet:=Syn_StartFindIDCard(iPort,@pucIIN, IfOpen)。 if iRet=0 then begin iRet:=Syn_SelectIDCard(iPort,@pucSN, IfOpen)。 if iRet=0 then begin iRet:=Syn_ReadMsg(iPort,0,CardMsg)。 if iRet=0 then begin :=trim()。 :=trim()。 :=trim()。 :=trim()。 :=trim()。 :=trim()。 :=trim()。 :=trim()。 :=trim()。 :=trim()。 ()。 := True。 := [5,3]。 Syn_SendSound(0)。 Syn_DelPhotoFile。 end。 end。 end。 Syn_ClosePort(iPort)。end
教學教案相關(guān)推薦
鄂ICP備17016276號-1