Fórum Arquivo #178040
28/08/2003
0
Gente quero escrever num arquivo txt sem apagar o que ja esta la?
Dart
Dart
Curtir tópico
+ 0Posts
28/08/2003
Demolitor
Faz assim...
Coloca um componente TMemo no teu formulario, ai carrega o conteudo do arquivo nele, edita e salva
pra carregar [b:ec5604c1c7]Memo1.Lines.LoadFromFile(´C:\arquivos\arquivo.txt´);[/b:ec5604c1c7]
pra salvar [b:ec5604c1c7]Memo1.Lines.SaveToFile(´C:\arquivos\arquivo.txt´);[/b:ec5604c1c7]
estas comandos podem ser colocados da forma q mais lhe convier, com 2 botoes ou no OnShow (pra carregar) e OnClose (pra salvar) do form
falow
Gostei + 0
28/08/2003
Dart
O megocio e o seguinte.
EU uso REwrite para abrir o arquivo e gravar as conteudos dos edit´s no arquivo. So que ele apaga tudo que estava ja no arquivo.
Como Fazer para isso nao acontecer.
Dart
Gostei + 0
28/08/2003
Basilio.sp
Pelo que vi você está fazendo a leitura do arquivo com ReadLn (ou Read) e escrevendo com WriteLn (ou write), sendo que você utilizou uma variável do tipo TextFile como ponteiro e a funcão AssigFile para atribuir um nome de arquivo pra esse ponteiro, certo?
Se foi isso, então aí vai:
- Utilize ReWrite somente quando você quer criar um arquivo (caso ele não exista) ou recriá-lo vazio (caso ele já exista);
- Caso você só queira somente abri-lo, utilize Reset;
- Para incluir informações, utilize Append.
Apesar de a solução proposta pelo demolitor funcionar bem para arquivos pequenos (32k no máximo), a mesma não te dá suporte para arquivos grandes e se você for manipular muito as informações você tem que escrever muito código.
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)