Wie lese ich eine UTF8-codierte INI-Datei?

Question

May 03, 2013, 07:51 PM

delphi-2010 delphi

Wie lese ich eine UTF8-codierte INI-Datei?

Ich habe eine INI-Datei im UTF-8-Format.

Ich verwende Delphi 2010, um die INI-Datei zu lesen und ein TStringGrid mit den Werten in der INI-Datei zu füllen.

var
  ctr : Integer;
  AppIni : TIniFile;
begin
  AppIni := TIniFile.Create(ExtractFilePath(Application.ExeName) + 'test.ini');
    for ctr := 1 to StringGrid1.RowCount do begin
        StringGrid1.Cells[0,ctr] := AppIni.ReadString('Column1','Row'+IntToStr(ctr),'');
        StringGrid1.Cells[1,ctr] := AppIni.ReadString('Column2','Row'+IntToStr(ctr),'');
    end;
  AppIni.Free;

Das Problem besteht darin, dass die Unicode-Zeichen im TStringGrid mit 2 Zeichen anstelle des Unicode-Zeichens 1 angezeigt werden.

Wie löse ich das?