Delphi 中 16 进制数以 $ 为前缀,所以将 16 进制形式的字符串转换为整数即可: function HexToDec(const AHexString: String): Integer; begin // 16 进制转换为 10 进制; Result := StrToInt(’$’ + AHexString); end;