射頻卡讀取問題? Delphi / Windows SDK/API
http://www.delphi2007.net/DelphiAPI/html/delphi_20061127101938167.html
畢業第一個工作就是射頻卡編程? ?
? 不知道怎么對射頻卡怎么進行讀和取數據 ? ? 還有保存. ? ? ?
? 您可以幫我下嗎 ? 高手! ? ? 小弟萬分感激! ?
? QQ:432186 ? ? ? E-mail:432186@qq.com

問廠商要資料 ?
? ?
? ?
? my ? qq ? : ? 406110146

估計會有現成的SDK給你，照著說明書寫就是了

會提供二次開發包的

這個最簡單的，向提供射頻卡的供應商要驅動（一般是提供一個Dll），然后要一個讀寫操作的例子（一般會含VC、VB、Delphi）。以后你照著例子做就Ok了。

基本都是RS232串口編程

大多數都是串口，直接用控件讀寫......

給你一個例子，各種廠家的也是大同小異 ?
? ?
? var ?
? ? ? FRFSector: ? SmallInt; ?
? ? ? FRFBlock: ? SmallInt; ?
? ? ? FRFComm: ? Integer; ?
? ? ? FRFSNR: ? LongInt; ?
? ? ? FRFNKeyType: ? Integer; ?
? ? ? FRFNKey: ? string; ?
? ? ? FRFRtn: ? Integer; ?
? ?
? ......初始化 ?
? ?
? function ? TRJCControl.InitRFControl: ? Boolean; ?
? begin ?
? ? ? FRFRtn ? := ? PTS.System.RJCLibrary.Open_Comm(FRFComm+1); ?
? ? ? if ? (FRFRtn ? <> ? 0) ? then ?
? ? ? begin ?
? ? ? ? ? Result ? := ? False; ?
? ? ? ? ? Exit; ?
? ? ? end; ?
? ? ? PTS.System.RJCLibrary.SetRC500State(1); ?
? ? ? FRFSector ? := ? 1; ?
? ? ? FRFBlock ? := ? 4; ?
? ? ? FRFNKeyType ? := ? 0; ?
? ? ? SetLength(FRFNKey,12); ?
? ? ? FRFNKey ? := ? 'ffffffffffff'; ?
? ? ? Result ? := ? True; ?
? end; ?
? ?
? ......讀卡 ?
? ?
? function ? TRJCControl.ReadCard: ? Boolean; ?
? var ?
? ? ? ReadMessage: ? string; ?
? begin ?
? ? ? Result ? := ? False; ?
? ? ? SetLength(ReadMessage,32); ?
? ? ? FRFRtn ? := ? PTS.System.RJCLibrary.ReadCard(FRFNKeyType, ? FRFNKey, ? ?
? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? FRFBlock, ? ReadMessage); ?
? ? ? FRFMessage.RFMsg ? := ? HexToStr(ReadMessage); ?
? ? ? FRFMessage.RFFlag ? := ? '成功'; ?
? ? ? FRFMessage.RFTag ? := ? '讀'; ?
? ? ? PTS.System.RJCLibrary.SetBeep(3,5); ?
? ? ? Result ? := ? True; ?
? end; ?
? ?
? 很簡單的。只要把廠家的API多熟悉就可以了。

轉載于:https://www.cnblogs.com/delphi2007/archive/2008/11/27/1342603.html

總結

以上是生活随笔為你收集整理的射频卡读取问题?的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。