Como altero um Arquivo txt ( mudar uma linha existente )

Delphi

29/10/2004

Como posso fazer para alterar o conteudo de uma linha qualquer de um arquivo txt, via código, sem perder todas as informações contidas.

ja testei criando uma novo arquivo, mas preciso realmente aletarar o mesmo

Desde já grato

Bruno


Bfbraz

Bfbraz

Curtidas 0

Respostas

Beto_martini

Beto_martini

29/10/2004

Olá Bruno.

Alterar uma linha de um arquivo TXT como vc. pretende (direto via código) não é possível pelo seguinte:

As funções para abertura de arquivos txt no delphi são as seguintes:

reset(), append() e rewrite() sendo,

reset() = abre um arquivo existente somente leitura
append() = abre um arquivo existente somente escrita: o texto que vc. inserir estará no final do arquivo
rewrite() = cria um novo arquivo somente escrita.

Entretanto, existem várias formas de vc. implementar isso. Descreva exatamente o que vc. precisa fazer e veremos a melhor forma.

Um abraço

Beto.


GOSTEI 0
Aroldo Zanela

Aroldo Zanela

29/10/2004

Colega,

var Arquivo: TStringList;
begin
  Arquivo:= TStringList.Create;
  Arquivo.LoadFromFile(´c:\temp\arquivo.txt´);
  Arquivo.Strings[2] := ´NUCLEO BANDEIRANTE´;
  Arquivo.SaveToFile(´c:\temp\arquivo.txt´);
  Arquivo.Free;
end;


Arquivo de origem:

Aroldo Zanela
End
Cidade
Estado
CEP
linha em branco
linha em branco
linha em branco
Juliana
End
Cidade
Estado
CEP
linha em branco
linha em branco
linha em branco


Resultado:

Aroldo Zanela
End
NUCLEO BANDEIRANTE
Estado
CEP
linha em branco
linha em branco
linha em branco
Juliana
End
Cidade
Estado
CEP
linha em branco
linha em branco
linha em branco



GOSTEI 0
POSTAR