Fórum função Salvar e Salvar todos #196798

O que você quer exatamente?
Como assim salvar e salvar todos?
São registros de uma tabela?São Arquivos que você abre onde? Como ?
Você fez tudo em delphi?
tente ser um pouco mais clara...

Olá !
Minha dúvida é tão primária que deixo os outrso com dúvidas !
:-)
Tudo é feito em delphi. Criei um table com os itens Código e descrição.
Criei um form com os botões Salvar / Salvar Todos / Fechar.
Neste form, insiro os dados em campos dbeditcódigo e dbeditdescricao.
O botão salvar, por exemplo, tem o seguinte código:
procedure TformPrincipal.buttonSalvarClick(Sender: TObject);
var
OutputFile : TextFile;
begin
with modDados do
begin
if SaveDialog1.Execute then
AssignFile(OutputFile, SaveDialog1.FileName);
try
Rewrite(OutputFile);
Writeln(OutputFile, labelCodigo.Caption, ´ ´, dbeditCodigo.Text);
Writeln(OutputFile, labelDescricao.Caption, ´ ´, dbeditDescricao.Text);
finally
CloseFile(OutputFile);
end;
end;
end;

Mas, quando digito um dado e clico em salvar, abre uma janela ´salvar como´ do Windows e eu tenho que informar o caminho e o nome do arquivo gerado. E mais, só fica armazenado o último registro.
É... sou mesmo muito enrrolada.
Sei que o help do Delphi funciona, mas eu ainda não fiz inglês.
Obrigada, por enquanto !
:)

Não sei entendi exatemente o que você quer, mas você precisa gravar um código para identificar o registro e também procurar para alterar e tudo mais.. .
eu não me lembro mais como se faz isso assim de cabeça.. mas eu acho que em casa eu ainda tenho um exemplo disso, vou procurar e se eu achar, te mando ok?

Seja bem-vinda, San! :D

Tente fazer o seguinte, na sua rotina:
- Altere Rewrite para Append. As três funções de abertura:
1) Reset: abre o arquivo para leitura;
2) Rewrite: abre o arquivo para escrita, sobrescrevendo(lá vão seus registros)
3) Append: abre o arquivo para escrita, mas posiciona o cursor de E/S no fim do arquivo, para adicionar dados.