如何显示十六进制代码char？

Question

我有一个文件包含每行上的FB8E,FB8F,FB90等数字.

我希望在我的程序中加载此文件并获取每一行并打印对应于该数字/行的字符.

对于expamle,我最坚定的一行是FB8E,我想把它转换成#$ FB8E(阿拉伯语Kaf),我该怎么做？

Answer 1

如果你在D2009/2010:

var
  F: TextFile;
  Line: string;
  Code: Integer;
  Ch: Char;

...
Readln(F, Line);
Code := StrToInt('$' + Line);
Ch := Char(Code);
...

否则用WideChar替换Char.

当然代码可以稍微压缩一下,但为了清楚起见,我把它留了下来.

编辑:对于那些不怕类型转换的人,在classes.pas中也有HexToBin函数.