//==============================================================================
procedure TKTasksApi.SaveIntoIniFile;
//------------------------------------------------------------------------------
var
IniFile : TIniFile;
begin
{$IFDEF MSWINDOWS}
IniFile := TIniFile.Create(ChangeFileExt(ParamStr(0),'.ini'));
{$ENDIF}
{$IFDEF ANDROID}
IniFile:=TIniFile.Create(System.IOUtils.TPath.GetDocumentsPath+'/config.ini');
{$ENDIF}
try
IniFile.WriteString('Tasks','UserName', fmTasks.cbTabSettingsUser.Selected.Text);
IniFile.WriteString('Tasks','Address', fmTasks.edtTabSettingsAddress.Text);
finally
IniFile.free;
end{ try..finally };
end{ procedure TKTasksApi.SaveIntoIniFile };
Всегда работал такой код.