[firebase-br] saber qual o erro no rollback?

[Daniel / Tecnobyte]

> Tem como saber a mensagem original de erro?
> Como vcs estão adimistrando isso?

try
   <instruções>
   IBTransc.Commit;
except
  on E: Exception do
  begin
     IBTransc.Rollback;
     showmessage('Erro ao gravar:'#13 + E.Message);
  end;
end;

Ou simplesmente:

try
  Commit;
except
  Rollback;
  raise;
end;

Atenciosamente.

Daniel P. Guimarães
Tecnobyte informática
www.tecnobyte.com.br