如何把一个16进制的文件转换成10进制文件

Question

如何把一个16进制的文件转换成10进制文件

Answer 1

你的问题本身就有问题!文件本身都一样,对于计算机来说文本文件也是二进制代码!区别就是文本文件最后一定是0D 0A!至于怎么以16进制显示并不复杂,比如可以将文件读入流,利用Stream.Read读取,InttoHex(xxx,2)将其转为16进制字符串!

Answer 2

{十六进值字符串转换成LongInt值}
function HexStrToInt(S: String): LongInt;
var
I: Integer;
begin
Result := 0;
for I := 1 to Length(S) do
begin
if S[I] in ['0'..'9'] then
Result := Result * 16 + (Integer(S[I]) - 48)
else if S[I] in ['A'..'F'] then
Result := Result * 16 + (Ord(S[I]) - 55);
end;
end;

Answer 3

直接转化。ShowMessage(IntToStr(StrToInt('$FEDCBA98')));