Нужна помощь

← →
ArtemSTR (2009-12-09 08:11) [0]

Здравствуйте. Мне нужно выполнить такое действие: у меня есть большой текстовый файл, нужно в начале каждой строчки вставить определенный символ. Как это можно реализовать? Заранее благодарен :) .

← →
ArtemSTR (2009-12-09 08:23) [1]

Также нужно вставить в конце каждой строчки, но это, я думаю, можно сделать в ворде. P.S. Извините, если риая тема уже существует, просто я сижу с телефона, и пользоваться поиском весьма затруднительно.

← →
Ymen (2009-12-09 08:25) [2]

Трудно, но выполнимо...

1. Запастись кипятком, чаем или кофе.
2. Взять "большой текстовый редактор".
3. Конечно терпение - тоже пригодиться.
4. Расправить руки над клавиатурой и приступить к работе.

← →
ArtemSTR (2009-12-09 08:30) [3]

Ну до этого я и сам бы додумался :), но соль в том, что в файле около 2 миллионов строк, и сами понимаете, что вручную это сделать нереально.

← →
ReadLn (2009-12-09 08:49) [4]

Если файд действительно текстовый

1. Открываем файл
В цикле
2. ReadLn();
3. Вставляем что надо и куда надо
4. Сохраняем в другое место
Конец цикла
5. Закрываем файл

← →
oleg1963lora (2009-12-09 08:59) [5]

var SourceFile, TargetFile : Text; {входной и выходной файлы}
VarStr : String;
PosEndStr : byte;

Begin
AssignFile(SourceFile,"C:\Documents\MyText.txt");
Reset(SourceFile);

AssignFile(TargetFile,"C:\Documents\NewText.txt");
ReWrite(TargetFile);
While not EOF(SourceFile) do
begin
Readln(SourceFile,VarStr);
Insert(VarStr,[1],"A");{вместо А - нужный тебе символ}
PosEndStr:=Length(VarStr);
PosEndStr:=PosEnd-2; {вставим нужны символ между}
текстом и символом возврата
{строки-#13}
Insert(VarStr,PosEndStr,"B");{вместо B - нужный тебе символ}
Writeln(TargetFile,VarStr);
end;
CloseFile(SourceFile);
CloseFile(TargetFile);
end.

Возьмите маленький кусочек текста и на нем проверьте.
О необходимости делать резервные копии говорить надеюсь не надо.
А милионнобайтный файл пускай внуки доредактируют! :)))

← →
ArtemSTR (2009-12-09 09:05) [6]

Спасибо большое за ответы, буду пробовать.

Нужна помощь Найти похожие ветки