verificar se existem registros nao comitados
amigos alguém sabe se tem como verificar se existem registros nao comitados em determinadas tabelas?
ex: tenho tabelas mestre / detalhe. o usuario edita ou insere alguma coisa em alguma delas via dbGrid, onde o post é dado automaticamente quando o usuário ´vai para uma nova linha´ do dbGrid.
gostaria que ao sair do formulário o sistema verificasse se nao foi dado um applyUpdates(), ou seja, se existem registros que nao foram comitados no banco. tem como?
uso: Delphi 2007, Firebird 2.0, dbx
obrigado a todos!
ex: tenho tabelas mestre / detalhe. o usuario edita ou insere alguma coisa em alguma delas via dbGrid, onde o post é dado automaticamente quando o usuário ´vai para uma nova linha´ do dbGrid.
gostaria que ao sair do formulário o sistema verificasse se nao foi dado um applyUpdates(), ou seja, se existem registros que nao foram comitados no banco. tem como?
uso: Delphi 2007, Firebird 2.0, dbx
obrigado a todos!
Mahdak
Curtidas 0
Respostas
Joaoshi
04/08/2008
Não seria algo do tipo:
Espero ter ajudado.
if SeuClientDataSet.ChangeCount > 0 then ´Tem Pendencia´ else ´Já gravou´;
Espero ter ajudado.
GOSTEI 0
Mahdak
04/08/2008
pois eh, o lance é que o ChangeCount está me retornando zero sempre...
GOSTEI 0
Thomaz_prg
04/08/2008
verifique o valor da propriedade UpdateStatus, mais ou menos assim:
if ClientDataset.UpdateStatus = usUnmodified then
Showmessage(´Nao modificado!´)
else
Showmessage(´Modificado!´);
if ClientDataset.UpdateStatus = usUnmodified then
Showmessage(´Nao modificado!´)
else
Showmessage(´Modificado!´);
GOSTEI 0