Escrever em arquivo Texto???

Question

Pessoal, tenho um arquivo.txt simples com apenas 3 linhas que guarda 3 Datas. ex:
04/04/03
05/04/03
06/04/03

Como fa�o para ALTERAR SOMENTE A 2� LINHA?
J� tentei mas ao inv�z disso, meu c�digo apaga as 3 linhas e escreve na 1�. Preciso manter as outras: a 1� e a 3�.

Qualquer ajuda, agrade�o!

Henry · Answer

Fa�a o arquivo cair em uma listbox dai altere a string referente a linha que vc quer mudar, se n�o conseguir, me da um toque no ICQ..221075981, blz meu brother??...

Aroldo Zanela · Answer

Crie um objeto TStringList e carregue o arquivo, altere a linha 2 e salve novamente;

Exemplo:

var ListaDatas: TStringList;
cArquivo: String;
begin
cArquivo:= �C:\DATAS.TXT�; // Ler e garvar
ListaDatas:= TStringList.Create;
  try
  ListaDatas.LoadFromFile(cArquivo); // Ler
ListaDatas.Strings[1] := DateToStr(Date); // Substituir o conte�do da linha 2
  ListaDatas.SaveToFile(cArquivo)   // Salvar
  finally
  ListaDatas.Free; // Liberar
  end;
end;

F�rum Escrever em arquivo Texto??? #152308