Как добавить в конце каждой строке?

[Anton62]

Здравствуйте, имеется текстовый файл, необходимо в конце каждой строке добавить несколько символов. Как это реализовать проще и быстрее?

Текст на английском, примерно 300 строк.
Спасибо.

[Sasha_Smirnov]

^p - крышка-пи, знак абзаца. Попробуйте также ^l (крышку-эль) — знак конца строки.

Окно замены вызывается по контрол-аш (Ctrl-h).

[edmynt]

program xxx;
uses crt;
var
f1,f2:text;
s,st:string;
begin
writeln ('Введите что добавить');
readln(st);
assign (f1,file.txt);
assign (f2,file2.txt);
reset(f1);
rewrite(f2);
while not eof(f1) do
begin
readln(f1,s);
s:=s+st;
writeln(f2,s);
end;
writeln('готово!!!');
repeat until keypressed;
end.

[SERG1980]

Ну а если в делфи то легче использовать TStringList

var SL:TStringList;
     i:integer;
begin
 SL:=TStringList.Create;
 SL.LoadFormFile('путь к файлу');
 for i:=0 to SL.Count-1 do
 SL[i]:=SL[i]+'ваши символы';
 SL.SaveToFile('путь сохранения');
 SL.Free; 
end;