Estou tendo dificuldades em apagar o conteúdo de um arquivo texto.
por exemplo:
AssignFile(f,'c:\windows\ERP\log_sistema.text');
if fileExists('C:\windows\ERP\log_sistema.text') then
begin
Append(f)
rewrite(F);
erase(f);
closefile(F);
end;
O código não está com todos esses comandos, mas
Use Reset(f)
Lucas
Em 03/03/2010 10:33, Augusto Bondan Nascimento escreveu:
Estou tendo dificuldades em apagar o conteúdo de um arquivo texto.
por exemplo:
AssignFile(f,'c:\windows\ERP\log_sistema.text');
if fileExists('C:\windows\ERP\log_sistema.text') then
begin
Append(f)
2 matches
Mail list logo