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 xe android判断程序是否在运行

实现拖动无标题窗口的5种方法

Delphi 动态调用chm文件

Delphi 手机号码库段号地区查询

Delphi pagecontrol当前页可视

Delphi 注入指定进程

Delphi 时间与字符串

Delphi 回车 选择下一个控件

Delphi windows 编程[21] - wm_menuselect 消息与 getmenustring 函数

Delphi关闭程序close,application.terminate与halt区别

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

转载请注明出处：木庄网络博客 » Delphi StrToHexStr 字符串转换Hex