本文整理自网络,侵删。
bintohex和hextobin
var ms: TMemoryStream;<br> var hex: string; SetLength(hex, ms.Size * 2); BinToHex(ms.Memory, PChar(hex), ms.Size);
var ms: TMemoryStream;<br>var hex: string; len := Length(hex) div 2; ms.SetSize(len); HexToBin(PChar(hex), ms.Memory, ms.Size); end;
https://www.cnblogs.com/hnxxcxg/p/12381626.html
相关阅读 >>
Delphi xe6开发的android应用实现在线升级完成后自动安装apk代码(加说明)
Delphi 网上获取北京时间 tinifile.readsection 方法在 android 下的应用及各种字符编码问题
Delphi整理七(function and procedure)
Delphi listboxadditems() 不重复添加edit1
更多相关阅读请进入《Delphi》频道 >>