interbase atualiza tabela só apos fechar o programa

Delphi

25/10/2013

Estou com dificuldade em fazer a tabela atualizar apos clicar no botão salvar segue parte do código usado:

with dm.Loja do
  begin
  Open;
  insert;
  fieldbyname(campo1).value:=vid;
  fieldbyname(campo2).value:=vnome;
  fieldbyname(campo3).value:=vie;
  fieldbyname(campo4).value:=vcnpj;
  fieldbyname(campo5).value:=vimunicipal;
  fieldbyname(campo6).value:=vcep;
  fieldbyname(campo7).value:=vestado;
  fieldbyname(campo8).value:=vcidade;
  fieldbyname(campo9).value:=vendereco;
  fieldbyname(campo10).value:=vnumero;
  fieldbyname(campo11).value:=vcomplemento;
  fieldbyname(campo12).value:=vtelefone;
  fieldbyname(campo13).value:=vtcelular;
  fieldbyname(campo14).value:=vemail;
  fieldbyname(campo15).value:=vwebsite;
  POST;
  Close;


Alguma Sugestão?
Christopher Tavares

Christopher Tavares

Curtidas 0

Respostas

Deivison Melo

Deivison Melo

25/10/2013

Para que a informação inserida seja exibida, tem que criar uma instrução sql depois.

Depois do insert vc fez a consulta e mesmo assim os valores não foram inseridos?
GOSTEI 0
Christopher Tavares

Christopher Tavares

25/10/2013

Estou olhando direto no IBconsole, e so vejo a informação lá, após fechar a aplicação.
GOSTEI 0
Cauê Nishijima

Cauê Nishijima

25/10/2013

Já tentou dar um ApplyUpdate?
GOSTEI 0
Lucas Garcia

Lucas Garcia

25/10/2013

Boa tarde amigo, tenta isso aqui, é como eu faço o insert

with dm.Loja do
  begin
  close;
  Open;
  insert;
  fieldbyname(campo1).value:=vid;
  fieldbyname(campo2).value:=vnome;
  fieldbyname(campo3).value:=vie;
  fieldbyname(campo4).value:=vcnpj;
  fieldbyname(campo5).value:=vimunicipal;
  fieldbyname(campo6).value:=vcep;
  fieldbyname(campo7).value:=vestado;
  fieldbyname(campo8).value:=vcidade;
  fieldbyname(campo9).value:=vendereco;
  fieldbyname(campo10).value:=vnumero;
  fieldbyname(campo11).value:=vcomplemento;
  fieldbyname(campo12).value:=vtelefone;
  fieldbyname(campo13).value:=vtcelular;
  fieldbyname(campo14).value:=vemail;
  fieldbyname(campo15).value:=vwebsite;
  post();


Caso der erro use append invés do insert
GOSTEI 0
Christopher Tavares

Christopher Tavares

25/10/2013

Consegui resolver o problema usando um commit no transaction.. tudo resolvido agora
GOSTEI 0
POSTAR