Código Delphi [-] try Query.ExecSQL; Transaction.Commit except Transaction.Rollback; ShowMessage('Ocurrió un error guardando los datos') end
try Query.ExecSQL; Transaction.Commit except Transaction.Rollback; ShowMessage('Ocurrió un error guardando los datos') end