Delphi 解决IniFiles中文乱码

使用 AnsiToUtf8 方法转换一下就可以了

 

procedure TForm1.LoadSettingsFromIni;
var
  IniFile: TIniFile;
begin
  IniFile := TIniFile.Create(FIniFilePath);
  try
    UserNameEdit.Text := AnsiToUtf8((IniFile.ReadString('Settings', 'UserName', '')));
    AccPathEdit.Text := AnsiToUtf8(IniFile.ReadString('Settings', 'AccPath', ''));
  finally
    IniFile.Free;
  end;
end;