如何显示十六进制代码字符？

Question

我有一个文件，每一行都包含 FB8E、FB8F、FB90 等数字。

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

例如，我的第一行是 FB8E，我想要一些东西来转换它，例如 #$FB8E（阿拉伯语 Kaf），我该怎么做？

Answer 1

如果您在 D2009/2010：

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

...
Readln(F, Line);
Code := StrToInt('
否则将 Char 替换为 WideChar。
当然，代码可以稍微压缩一下，但为了清楚起见，我省略了这一点。
编辑：对于那些不害怕类型转换的人来说，classes.pas 中还有 HexToBin 函数。
 + Line);
Ch := Char(Code);
...

否则将 Char 替换为 WideChar。

当然，代码可以稍微压缩一下，但为了清楚起见，我省略了这一点。

编辑：对于那些不害怕类型转换的人来说，classes.pas 中还有 HexToBin 函数。

Answer 2

您不会对简单地将行转换为 #$FB8E 感到满意，因为编译器很可能会为您解决这些问题。

因此，这里的一般方法是读取该行，解析十六进制值并根据该值创建一个 WideChar。但近年来我没有做太多 Delphi，所以我恐怕无法告诉你具体如何做到这一点。