Excluir uma linha em um arquivo Texto...
Estou trabalhando com um arquivo texto exemplo:
Var
Arq : TextFile;
begin
try
AssignFile(Arq,´C:\arquivo.txt´);
if FileExists(´C:\arquivo.txt´) then
Append(Arq)
else
Rewrite(Arq);
Writeln(Arq,´teste´);
CloseFile(Arq);
COMO QUE EU FAÇO PARA EXCLUIR UMA DETERMINADA LINHA DESSE ARQUIVO??EXISTE ALGUMA FUNÇAO PARA ISSO?
OBRIGADA!!!
Var
Arq : TextFile;
begin
try
AssignFile(Arq,´C:\arquivo.txt´);
if FileExists(´C:\arquivo.txt´) then
Append(Arq)
else
Rewrite(Arq);
Writeln(Arq,´teste´);
CloseFile(Arq);
COMO QUE EU FAÇO PARA EXCLUIR UMA DETERMINADA LINHA DESSE ARQUIVO??EXISTE ALGUMA FUNÇAO PARA ISSO?
OBRIGADA!!!
Thais_b
Curtidas 0
Respostas
Lenyr Buarque
10/05/2004
Sugiro que vc mova o conteudo do arquivo para uma StringList e depois manipule, podendo então deletar a linha do stringlist e depois salvar o conteudo da stringlist novamente no arquivo.
Espero der ajudado.
Espero der ajudado.
GOSTEI 0