Como Trabalhar com Arquivos Textos

Ok, vamos lá:

LER O ARQUIVO
==========
Var linha:String; Arquivo:TextFile;
begin

AssignFile(Arquivo, ´C:\TEXTO.TXT´);
Reset(Arquivo);
while Not EOF(Arquivo) do begin
Readln(Arquivo,Linha); //lê cada linha do arquivo.
end;
CloseFile(Arquivo);


GRAVAR ARQUIVO
============
assignFile(Arquivo,´c:\TEXTO2.TXT´);
Rewrite(Arquivo);

Writeln(Arquivo,´texto que quer gravar no arquivo´);

CloseFile(Arquivo);



Estão os códigos para leitura e gravação, implemente o código para alteração das linhas, a variável LINHA é string e equivale a cada linha do arquivo texto, trate-a como achar melhor.

Um Abraço,