delphi - 将 Utf8 转换为 Unicode

Question

我有一个文本文件。我应该将其转换为 Utf8。转换后，文件中的所有数字都转换为问号。例如 1380 转换为 4 个问号，如下所示：'????'。我正在使用delphi 2009。

这是我的转换代码：

RichEdit1.Lines.LoadFromFile(OpenDialog1.FileName,TEncoding.UTF8);

我该如何纠正这种转换？

Answer 1

TEncoding.Unicode如果您的文件是 UTF-16LE（“Unicode”）格式，您应该使用。或者您应该在将文件加载到 RichEdit 之前将其转换为 UTF-8。