Size: a a a

2020 February 23

AS

Alexey Shumkin in Delphi & Lazarus
Vitalii Ishkevych
Мне нужно из тхт файла прочитать все строки, добавить после них ещё 1 строку и записать в новый тхт. Как это сделать?
Ровно так, как ты описал
источник

VI

Vitalii Ishkevych in Delphi & Lazarus
Alexey Shumkin
Ровно так, как ты описал
var
   F: TextFile;

begin
AssignFile...
Reset...
А дальше?
end;
источник

S

SuMaga in Delphi & Lazarus
Vitalii Ishkevych
Мне нужно из тхт файла прочитать все строки, добавить после них ещё 1 строку и записать в новый тхт. Как это сделать?
Tstringlist в помощь
источник

AS

Alexey Shumkin in Delphi & Lazarus
Vitalii Ishkevych
var
   F: TextFile;

begin
AssignFile...
Reset...
А дальше?
end;
Какого размера файлы?
источник

VI

Vitalii Ishkevych in Delphi & Lazarus
источник

VI

Vitalii Ishkevych in Delphi & Lazarus
И +1 строку и записать в новый тхт
источник

AS

Alexey Shumkin in Delphi & Lazarus
У нас тут русскоязычный чат
источник

VI

Vitalii Ishkevych in Delphi & Lazarus
Alexey Shumkin
У нас тут русскоязычный чат
Какая разница что в документе написано то? Вы подскажите на русском. Я не вынуждаю Вас на украинском разговаривать или писать
источник

AS

Alexey Shumkin in Delphi & Lazarus
Vitalii Ishkevych
Какая разница что в документе написано то? Вы подскажите на русском. Я не вынуждаю Вас на украинском разговаривать или писать
А, в смысле это пример файла, в который нужно дописать?
источник

VI

Vitalii Ishkevych in Delphi & Lazarus
Alexey Shumkin
А, в смысле это пример файла, в который нужно дописать?
Этот файл нужно прочитать (Сохранить в переменную) дописать 1 строчку вконце (Уже есть заготовленая) и создать новый тхт и туда записать то что мы прочитали (+ ту строчку что мы добавили)
источник

AS

Alexey Shumkin in Delphi & Lazarus
Vitalii Ishkevych
Этот файл нужно прочитать (Сохранить в переменную) дописать 1 строчку вконце (Уже есть заготовленая) и создать новый тхт и туда записать то что мы прочитали (+ ту строчку что мы добавили)
Так бы и говорил сразу
источник

VI

Vitalii Ishkevych in Delphi & Lazarus
Alexey Shumkin
Так бы и говорил сразу
Я пытался это донести 🙂
источник

RS

Renat Suleymanov in Delphi & Lazarus
Vitalii Ishkevych
Я пытался это донести 🙂
aStrings:=TStringList.Create;
aStrings.LoadFromFile(aFileName);
aStrings.Add(AnotherLine);
aStrings.SaveToFile(aNewFileName);
aStrings.Free;
источник

VI

Vitalii Ishkevych in Delphi & Lazarus
Renat Suleymanov
aStrings:=TStringList.Create;
aStrings.LoadFromFile(aFileName);
aStrings.Add(AnotherLine);
aStrings.SaveToFile(aNewFileName);
aStrings.Free;
Thanks
источник

S

S.Atan in Delphi & Lazarus
Парни! Всех с праздником!🍻
источник

М

Михаил in Delphi & Lazarus
С праздником, орёл!
источник

Y

Yuriy in Delphi & Lazarus
👍
источник

KB

Kit Bayun in Delphi & Lazarus
Vitalii Ishkevych
Мне нужно из тхт файла прочитать все строки, добавить после них ещё 1 строку и записать в новый тхт. Как это сделать?
используй TStringList
источник

VI

Vitalii Ishkevych in Delphi & Lazarus
dlgOpen1 у него есть свойство DefaultExt, что туда указать? (Работаю только с тхт файлами)
источник

AS

Alexey Shumkin in Delphi & Lazarus
Vitalii Ishkevych
dlgOpen1 у него есть свойство DefaultExt, что туда указать? (Работаю только с тхт файлами)
Во-первых, никто, кроме тебя, не знает, что такое dlgOpen1
Во-вторых, прочти справку по этому компоненту. Там, стопудов, написано.
источник