转换十六进制字符串到整型数值.txt

来自「常见的几种数据格式转换,例如16进制字符串转化为16进制字节数组」· 文本 代码 · 共 9 行

function HexStrToInt(sHex: string): int64;        //转换十六进制字符串到整型数值
var
  I: Integer;
begin
  Result := 0;                                    //设置缺省返回值

  for I := 1 to Length(sHex) do                   // Iterate
    Result := Result * 256 + ord(sHex[I]);
end;