Чтение unicode символы от текстового файла в Delphi 2009

У меня есть следующая часть кода, чтобы считать японские символы Kanji из Текстового файла формата 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;

Но вместо символов я вижу некоторый набор полностью различных символов, не связанных с японским набором. Какие-либо подсказки?