Hola
Tengo una función que devuelve un valor true o false , si se han podido o no grabar los datos .
Esto con Firebird , y tengo una TIBQuery , asociado el provider y el TClientDataSet y un componente TIBUpdateSQL para actualizar.
La tengo códificada algo así :
Código Delphi
[-]
Result := True;
miClientDataSet.post;
miClientDataSet.ApplyUpdates(0);
Try
IBTransaction1.Commit;
Except
IBTransaction1.Rollback;
Result := False;
end;
Pues bien , cuando me da una excepcion al pasar por miClientDataSet.ApplyUpdates(0); , no me entra en el Except y me devuelve True , en lugar de False y luego pues no puedo mostrar un mensaje al usuario , que saldria obviamente , cuando la función devuelva False y no True.
¿Qué es lo que falla en el código ?
Cómo deberia de poner dicha excepción ??
Un saludo