GARANTIR DESCONTO

Fórum Perdendo dados gravados #347012

04/10/2007

0

Olá,

Estou usando o codigo abaixo para gravar dados no programa (D7/IBX/FIREBIRD 1.5). O codigo funciona corretamente, mas se ocorre algum problema na maquina (falta de energia por exemplo), quando ela é ligada novamente e abro o programa os dados que inclui qdo o programa estava aberto não aparecem. Como faço para resolver esse problema? Obrigado.

With dtMODULO.QryINSAgenda do
begin

ParamByName(´dat_dia´).asDate := dtdata.date;
ParamByName(´hor_hora´).asTime := strtotime(maskhora.text);
ParamByName(´des_evento´).asstring := edevento.text;
ParamByName(´des_detalhe´).asstring := memodetalhe.text;

ExecSql;
End;

Luiz


L_carlos

L_carlos

Responder

Posts

04/10/2007

Paulo

No evento AfterPost, do componente de gravação e no AfterDelete, coloque:
TComponenteQuery.ApplyUpdates(0);


Responder

Gostei + 0

04/10/2007

Gandalf.nho

Você precisa comitar as transações.


Responder

Gostei + 0

05/10/2007

L_carlos

OK Gandalf,

Mas se eu der um commit na transação toda vez que incluir ou editar um registro, isso não vai deixar o programa meio lento? Ou não tem nada a ver?

Luiz


Responder

Gostei + 0

05/10/2007

Gandalf.nho

O habitual é comitar a cada registro incluído/editado/excluído (exceto nos casos de operações em lotes), assim as chances de perder dados são reduzidas.


Responder

Gostei + 0

06/10/2007

L_carlos

Vlw Gandalf.

Luiz


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar