Como eu faço para resetar Aqrtxt ??
15/02/2003
0
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;
AssignFile(Arq,´texto.txt´);
Rewrite(Arq);
Try
writeln(Arq,s);
Finally
Closefile(Arq);
End;
Anonymous
Curtir tópico
+ 0
Responder
Posts
15/02/2003
Carnette
DeleteFile(´texto.txt´) <---Linha incluida
AssignFile(Arq,´texto.txt´);
Rewrite(Arq);
Try
writeln(Arq,s);
Finally
Closefile(Arq);
End;
AssignFile(Arq,´texto.txt´);
Rewrite(Arq);
Try
writeln(Arq,s);
Finally
Closefile(Arq);
End;
Responder
Clique aqui para fazer login e interagir na Comunidade :)