ayuda excepciones

[ContraVeneno]

Empezado por yevabas

...entonces no se como evitar q cuando suceda esto y me frene el programa ya copie tu código y me sale lo mismo...

sigo sin captar que tratas de decir...
¿qué quieres evitar?
¿quieres que continue con el siguiente registro o que se detenga por completo?

[yevabas]

buenos dias

Disculpa por no ser tan claro.

Correcto quiere que verifique el siguiente registro a ver si ya esta cargado o no, no quiero que frene el proceso sino continué, en este momento sale el error y la aplicación se frena mostrando un error de duplicación de llave, y no quiero que muestre ningún tipo de error de duplicación de llave primaria sino que termine de revisar todos y cargue los que falte y sino falta nada pues no haga nada pero no muestre errores que no se quede ahí y me saque de la aplicación sino que quede listo para continuar cuando uno le de clic en el botón insertar.

Espero haber sido un poco mas claro y gracias muchas gracias de verdad

[ContraVeneno]

en lugar de poner "Raise" para que te muestre el mensaje del error... utilizar ShowMessage o un cuadro de diálogo.

Código Delphi [-]
with Form1.IBTable1 do begin 
 try
  Post; // Guardamos los cambios.
 except
  on  E: EIBInterBaseError do begin
   Cancel; // <<-- Aquí cancelas  los cambios...
   case E.IBErrorCode of
     335544665: begin
       //si ocurre este error
      end; 
     else
      //este ya no: raise; //cualquier error que no esté dentro del case muestra el mensaje
      showmessage(E.Message +', ' + E.ClassName +', '+ E.IBErrorCode);
   end; //case
  end; //E:EIBInterbaseError
end; //with

Con esto te muestra el mensaje, pero no lo hace como una excepción y debería continuar con el siguiente proceso.

[yevabas]

gracias por tu ayuda ya esta funcionando no se porq antes no lo hacia.
estaría cometiendo algún error pero ya quedo como quería de nuevo muchas gracias por el tiempo que me dedico y por la gran ayuda prestada...

[ContraVeneno]

Empezado por yevabas

...no se porq antes no lo hacia...

Pues si solo cambiaste el "raise" por un mensaje... pues era eso...

El detalle es que la instrucción "Raise" te genera la excepción en el programa y este le da todo el tratamiento que se le da a un error.

Al cambiarlo por un mensaje, pues es solo eso, un mensaje, no hay error y el programa continua.