Exemplo de bloco com ADO exception

Try
ADOConnection.BeginTrans

// do everything you need

ADOConnection.CommitTrans
except
ADOConnection.RollbackTrans

end
Outro exemplo:
var Level: integer;
begin
  Level:=ADOConnection1.BeginTrans;
  try
    //do some database
    //updating, deleting or inserting
    ADOConnection1.CommitTrans;
  except
    on E:Exception do ADOConnection1.RollbackTrans;
  end;//try
end;
Esse post foi publicado em Pizza e marcado , . Guardar link permanente.

Deixe uma resposta

Preencha os seus dados abaixo ou clique em um ícone para log in:

Logotipo do WordPress.com

Você está comentando utilizando sua conta WordPress.com. Sair / Alterar )

Imagem do Twitter

Você está comentando utilizando sua conta Twitter. Sair / Alterar )

Foto do Facebook

Você está comentando utilizando sua conta Facebook. Sair / Alterar )

Foto do Google+

Você está comentando utilizando sua conta Google+. Sair / Alterar )

Conectando a %s