TStringListにて・・・

解決

Sara 2015-01-29 21:57:34 No: 47016

みなさんこんにちは

Windows8.1 64Bit
Delphi XE5

StringListに以下のように文字列を追加して保存すると・・・

結果が

?
?世

と言う風に「侗」が｛?」に化けてしまうのですが、回避方法はありますでしょうか？

ちなみに、保存処理の前後でStrListの内容をShowMessage等で確認すると正常です。

  StrList := TStringList.Create;
  try
    StrList.Add('侗');
    StrList.Add('侗世');
  finally
    StrList.SaveToFile('d:\test.txt');
    StrList.Free;
  end;

通りすがり 2015-01-29 22:02:15 No: 47017

保存を
StrList.SaveToFile('d:\test.txt',TEncoding.UTF8); // UTF-8で保存
とか
StrList.SaveToFile('d:\test.txt',TEncoding.Unicode); // UTF-16LEで保存
にすればいいんじゃないですかね

System.Classes.TStrings.SaveToFile - RAD Studio API Documentation
http://docwiki.embarcadero.com/Libraries/XE5/ja/System.Classes.TStrings.SaveToFile

Sara 2015-01-29 22:02:29 No: 47018

おっと・・・漢字が表示されていないですね・・・
人偏に同じ（イ同みたいな字）なわけですが・・・

そうか、 StrList.SaveToFile('d:\test.txt',TEncoding.UTF8);
としないといけないわけですね・・・

失礼しました。