• 函数类型：　自定义函数

• 函数说明：

字符串转十六进制

• 代码如下：

function StrToHex(src: string): string; var I: Integer; des: string; begin des := ''; for I := 1 to Length(src) do begin des := des + IntToHex(Ord(src[I]), 2) + ' '; end; Result := des; end;

• 用法示例：

无　

《学习大师原创文档，请勿转载，侵权必究》