Error Key Violation

[judit25]

Empezado por marcoszorrilla

El error significa que tienes un valor duplicado en la clave primaria, por lo tanto antes de grabar el documento deberías comprobar que no existe otro con el mismu número.

Un Saludo.

Gracias por responder.

Actualmente cuando presiono el boton de agregar, este me trae el ultimo numero de la tabla en el que guardo las facturas y le agrego uno, es decir que el numero del documento aun no existe. Es por eso que no se que podria ser lo que me esta causando el error .

Lo calculo de la siguiente manera:

Código Delphi [-]
if DM.QDocumento.Fields[0].IsNull then
  begin
    numerof := 1;
  end
else
  begin
    numerof := DM.QDocumento.Fields[0].AsInteger;
    numerof := numerof + 1;
  end;

Alguna otra sugerencia?

Gracias anticipadas