Delphi StrToHexStr 字符串转换Hex


本文整理自网络,侵删。

 
function StrToHexStr(const S:string):string;
var
  I:Integer;
begin
  for I:=1 to Length(S) do
  begin
    if I=1 then
      Result:=IntToHex(Ord(S[1]),2)
    else Result:=Result+' '+IntToHex(Ord(S[I]),2);
  end;
end;

相关阅读 >>

Delphi 关于xe10下indy发送字符串编码的问题

Delphi一个简单的多线程例子

download 和 http downloader 源码

Delphi 10.4 freeandnil 问题

Delphi vcl tmemo加速字符串读取

Delphi datasnap 初步入门使用总结

firemonkey 做 app 的界面设计方法研究

Delphi 给力版 getprocaddress

Delphi中判断webbrowser的页面是否加载完成

Delphi共享软件防破解的实用方法

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...