[firebase-br] Commit

Jorge Umberto niko em bruner.com.br
Seg Ago 20 16:08:12 -03 2007


 E para tentar melhorar, a cada close dos forms de cadastro eu fiz uma
procedure assim:

procedure TModuloGen.comitta;
begin
  ModuloGen.IBtransaction.Commit;
  ModuloGen.ShowStatusBar('Efetuando Commit');
  FMenu.Refresh;
  if not Modulogen.IBtransaction.InTransaction then
    Modulogen.IBtransaction.StartTransaction;
  ModuloGen.sia.Connected :=true;
  ModuloGen.ShowStatusBar('Conectando');
  ModuloGen.ShowStatusBar('');
  FMenu.Refresh;
end;

Não sei se isso ajuda a melhorar o controle Transacional...





Mais detalhes sobre a lista de discussão lista