Como eu faço para resetar Aqrtxt ??

Delphi

15/02/2003

Eu queria resetar(Apagar) meu aqrtxt antes de gravar tem jeito ??

AssignFile(Arq,´texto.txt´);
Rewrite(Arq);
Try
writeln(Arq,s);
Finally
Closefile(Arq);
End;


Anonymous

Anonymous

Curtidas 0

Respostas

Carnette

Carnette

15/02/2003

DeleteFile(´texto.txt´) <---Linha incluida
AssignFile(Arq,´texto.txt´);
Rewrite(Arq);
Try
writeln(Arq,s);
Finally
Closefile(Arq);
End;


GOSTEI 0
POSTAR