Arquivo Texto
16/12/2003
0
M@rcio
Posts
16/12/2003
Coelhopirado
memo1.lines.savetofile(´c:\texto.txt´);
O que tiver no edit vai para o arquivo de texto.A linha de código é mais ou menos como está acima...
16/12/2003
Diogoalles
... var Arq begin ... AssignFile(Arq, ´c:\Arq.Txt´); Rewrite(Arq); writeln(Arq,´O Texto q vc quer´); writeln(Arq,´Qtas vezes quiser´); CloseFile(Arq); // encerra o arquivo ... end;
abraço
Diogo
16/12/2003
Tnaires
... var Arq begin ... AssignFile(Arq, ´c:\Arq.Txt´); Rewrite(Arq); writeln(Arq,´O Texto q vc quer´); writeln(Arq,´Qtas vezes quiser´); CloseFile(Arq); // encerra o arquivo ... end;
Faltou declarar a variável Arq como sendo do tipo TextFile.
Rewrite apaga tudo q tiver dentro do arquivo. Para adicionar linhas, use Append(arquivo).
Sucesso a todos
Clique aqui para fazer login e interagir na Comunidade :)