登录
首页 » delphi » M1卡一卡通开发读写卡的辅助工具(附源码和运行库)

M1卡一卡通开发读写卡的辅助工具(附源码和运行库)

于 2022-07-17 发布 文件大小:3.07 MB
0 72
下载积分: 2 下载次数: 1

代码说明:

做m1卡一卡通系统时,由于经常要读写卡片,对卡片扇区的控制字(控制区块的6,7,8字节)需要解析或者合成,通常都是去自己对照麻烦的文档。索性自己写了个工具,只需要输入三个字节的控制字,就能显示个区块的控制位;或者反过来输入各区块的控制位,合成6,7,8字节的控制字。PS:之前传的那个反应说缺少运行文件,这次重新打包,将borland runtime和delphi源码一起奉上,希望对你有帮助。

下载说明:请别用迅雷下载,失败请重下,重下不扣分!

发表评论

0 个回复

  • Delphi找图找色单元
    Delphi找图找色单元,速度还可以!网上流传的代码!具体使用方法,可以百度搜索教程! 总体来说速度不错!
    2022-11-11 05:10:03下载
    积分:1
  • delphi做的小程序,可以播放声音文件,并可以实现声音文件的循环播放...
    delphi做的小程序,可以播放声音文件,并可以实现声音文件的循环播放-so small programs that can play audio files, and sound files can be achieved by recycling players
    2022-01-22 04:02:09下载
    积分:1
  • d2
    说明:  啊D注入检测系统Delphi源代码 学习DelPhi在安全方面的可以看看(Ah D detection system into the Delphi source code to learn the safety DelPhi can look at)
    2009-08-12 16:39:14下载
    积分:1
  • delphi POS小票打印
    delphi POS小票打印 热敏 58mm 调用驱动 只要装了驱动即可调用驱动打印出小票格式
    2022-01-26 04:51:52下载
    积分:1
  • In-Delphi7-Install-TurboPowerAPRO
    在Delphi7环境里,讲解安装TurboPower APRO 控件到IDE的步骤。(In Delphi7 environment, explain the controls to the IDE to install TurboPower APRO steps.)
    2011-04-27 13:32:14下载
    积分:1
  • 程序启动画面
    软件打开之前弹出个启动画面。可以显示软件相关内容,用于丰富软件格调。
    2022-10-01 17:55:03下载
    积分:1
  • Delphi文件加壳脱壳
    delphi 文件加壳 脱壳-delphi file packers Shelling
    2023-08-27 15:50:04下载
    积分:1
  • 犯错
    DELPHI7运用编程150例 本书主要针对具有一定Delphi基础知识的读者,全书通过150个实例全面、深入地介绍了用Delphi 7开发应用程序的常用方法和技巧。全书共分为8章,主要讲解了用Delphi 7进行界面效果处理、图像处理、图形与多媒体开发、系统功能控制、文件处理、网络与数据库开发,以及组件应用等内容。这些实例简单实用、典型性强、功能突出,很多实例使用的技术稍加扩展可以解决同类问题。使用本书最好的方法是通过学习掌握实例中的技术或技巧,然后使用这些技术尝试实现更复杂的功能并应用到更多方面。 -err
    2022-05-13 20:19:04下载
    积分:1
  • delphi json读写
    现在用传统的webservice的依然很多,但传统的都是XML传参,而现在越来越多的人喜欢用json来传参,对于还是delphi7忠实粉丝的人来说,依然还是有办法的,delphi7也是可用json传参的,下文就介绍了其详细源码。。。。。
    2022-02-10 11:31:12下载
    积分:1
  • Delphi 7.0 在局域网内发消息
    Delphi 7.0 在局域网内发消息,这个本站收集有很多例子了,学习Delphi网络编程可参考的例子,Delphi网络发消息,局域网发消息的例子,敬请关注。   局域网内发消息核心代码:   procedure TFrmSendMessage.Sendmessage(const msg,tomachine,from:string);   var    ms:PWideChar;   begin    ms:=PWIDEChar(WideString(msg));    NetMessageBufferSend(nil,pWidechar(WideString(tomachine)),pWidechar(WideString(from)),ms,length(msg)*2);   end;   procedure TFrmSendMessage.BtnSendClick(Sender: TObject);   begin    Sendmessage(mmMessage.Text,EDTo.Text,EDFrom.Text);   end;
    2022-04-01 17:32:07下载
    积分:1
  • 696518资源总数
  • 106265会员总数
  • 10今日下载