rewrite
O comando Rewrite é usado para criar um arquivo do tipo texto ou, se ele já existir, para apagá-lo e criar um novo arquivo, posicionando o cursor de leitura no seu início.
Sintaxe
rewrite( variavelArquivo );
Onde variavelArquivo é uma variável do tipo TEXT.
Exemplo
Program PascalZIM;
var
arq: Text;
begin
assign( arq, 'TEST.TXT' );
rewrite( arq ); // Cria um novo arquivo
writeln( arq, 'texto inicial');
close( arq ); // Fecha o arquivo, salvando as alteracoes efetuadas
append( arq ); // Abre o arquivo para adicionar mais texto no final
writeln( arq, 'mais texto!' );
close( arq ); // Fecha o arquivo, salvando as alteracoes efetuadas
end.
Created with the Freeware Edition of HelpNDoc: Easily create Help documents