在Delphi 2009中从文本文件中读取unicode字符

Question

我有以下代码从UTF-8格式的文本文件中读取日文汉字字符,然后将其加载到备忘录中.

Var F:textFile;
S:string;
Begin
 AssignFile(F,'file.txt');
 Reset(F);
 While not EoF(F) do
 Begin
  Readln(F,S);
  Memo1.Lines.Add(S);
 End;
 CloseFile(F);
End;

但是不是字符,而是看到一些完全不同的符号,与日本集无关.任何提示？

Answer 1

使用Memo1.Lines.LoadFromFile,或LoadFromStream.TextFile即使在Delphi 2009中,仍然使用ANSI.