Array
(
)

AlterPost para atualizar tela Cadastro

Flavia_mococa
   - 12 ago 2004

Olá amigos delphianos,
Apos inserir um novo registro na minha tabela GUIASETOR através de um ibdataset eu gostaria que a tabela fosse atualizada automaticamente para que o usuraio pudesse ver no grid abaxo do cadastro o novo item inserido. Pensei em colocar este codigo no evento AlterPost do ibdataset:

procedure TDatModule.dsGuiaSetorAfterPost(DataSet: TDataSet);
begin
DatModule.dsGuiaSetor.Close;
DatModule.dsGuiaSetor.Open;
datModule.dsGuiaSetor.Refresh;
end;

end.

Eu gostaria de saber se algum amigo do forum tem uma ideia melhor sobre como fazer esta atualização ´imediata´ sem a necessidade de fechar o form e abri-lo novamente.


Roy
   - 12 ago 2004

Faça o seguinte:

DatModule.dsGuiaSetor.Post;
DatModule.dsGuiaSetor.applyUpdates;
datModule.ibtransaction.CommitRetaining;


Flavia_mococa
   - 13 ago 2004

Obrigado amigo,.
Funcionou como eu queria :wink: