Ошибка 104 пытаюсь считать из *.txt файла

[delcpy]

Приложение для android 

i/o error 104 

Данная ошибка появляется если добавить read или readlen

 

В Deployment добавил в .\assets\internal

USES System.IOUtils;

var
  tMyFile: TextFile;
  sFileName: string;
  sMyString: string;

 

procedure TfrmMain.Button1Click(Sender: TObject);
begin
  sFileName := Tpath.GetDocumentsPath + PathDelim + 'ip.txt';
  sMyString := edtIP.Text;
  AssignFile(tMyFile, sFileName);
  Rewrite(tMyFile);
  Writeln(tMyFile, sMyString);
  Readln(tMyFile, sMyString);
  CloseFile(tMyFile);
end;

Изменено 24 апреля, 2022 пользователем Бука

[krapotkin]

когда появился этот синтаксис, андроида не было даже в самых радужных мечтах

нельзя использовать средства работы с файлами из этого тысячелетия ?

System.IOUtils.TFile например

и не забыть кодировку указать UTF8

[delcpy]

Сам накосячил. Уже разобрался.

 

var
  tMyFile: TextFile;
  sFileName: string;
  sMyString: string;

sFileName := Tpath.GetDocumentsPath + PathDelim + 'ip.txt';
AssignFile(tMyFile, sFileName);
Rewrite(tMyFile);
Writeln(tMyFile, sMyString);
Readln(tMyFile, sMyString);
CloseFile(tMyFile);

edtIP.Text:=sMyString ;

Изменено 26 апреля, 2022 пользователем Бука