Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 15.12.2012, 14:47   #1
Fakov
Пользователь
 
Регистрация: 13.12.2009
Сообщений: 85
Вопрос Добавить строку в файл с нужной позиции

Задача:

есть текстовый файл с несколькими строками, допустим

Код:
mama
moet everyday
ramy
Необходимо добавить перед(!) третьей строкой новую строку с текстом, чтобы получилось так:

Код:
mama
moet everyday
programmerskyu
ramy
Проблема:
Нет никаких уже предположений как это сделать. Файл открывается, в конец файла строку могу записать, но на третью строку добавить - ну никак.

юзал seekeoln и seekeof - профита ноль. дважды ReadLn(File) - тоже результатов не дал.

Как добавить в существующий файл строку на третьей строчке?
Fakov вне форума Ответить с цитированием
Старый 15.12.2012, 14:53   #2
Пепел Феникса
Старожил
 
Аватар для Пепел Феникса
 
Регистрация: 28.01.2009
Сообщений: 21,000
По умолчанию

используйте TStringList и его методы LoadFromFile,Insert,SaveToFile.
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
Программа делает то что написал программист, а не то что он хотел.
Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите.
Пепел Феникса вне форума Ответить с цитированием
Старый 15.12.2012, 15:51   #3
StoxFT
 
Регистрация: 15.12.2012
Сообщений: 7
По умолчанию

Если быть немного точнее:

Procedure InsertRow;
var
_Data: TStringList;
begin
_Data := TStringList.Create;
_Data.LoadFromFile('Путь до файла');
_Data.Insert(2, 'Текст'); // Строки в TStringList начинаются с нуля.
_Data.SaveToFile('Путь до файла');
_Data.Clear;
end;
StoxFT вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Добавить файл и из его выводить в memo любую строку. misher Общие вопросы Delphi 9 06.02.2014 21:40
Как добавить строку в файл который лежит на серваке gufon Работа с сетью в Delphi 7 15.07.2011 19:25
Добавить в файл строку(ошибка) MyLastHit Общие вопросы Delphi 11 14.01.2011 11:40
Копировать в нужную переменную при отсутсвиии нужной позиции Shouldercannon Общие вопросы Delphi 1 20.10.2010 19:17