Fórum Arquivo txt #193018

05/11/2003

0

Ola amigos tudo bem??



como posso fazer para que eu delete de um arquivo texto apenas 1 linhas, e salvar o arquivo para uma possivel edição mais tarde?



Obrigado!


Uiliangurjon

Uiliangurjon

Responder

Posts

05/11/2003

Sam

Amigão tente assim, eu não testei, veja se funciona.

crie uma variavel
var
F : textfile;

Carregue o conteudo do Arquivo nesta variavel
AssignFile(F,´C:\arquivo.txt´);

Jogue o conteudo o F no TMEMO e trate o conteudo no MEMO

Depois jogue o Conteudo Alterado do TMEMO no F
rewrite(f)
i := 0;
while i <= memo1.lines.count then
begin
Writeln(F,Memo1.Lines[i].text);
end;
CloseFile(F);

Abraços !!!


Responder

Gostei + 0

05/11/2003

Carlosk

vc pode usar o memo.loadfromfile(nomedoarquivo) para carregar o arquivo. edite ele como vc achar melhor e salva com o memo.savetofile(nomedoarquivo).


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar