Update Failed

[marilinspi]

Hola, primero que nada les digo que ya he buscado en todos los hilos y no encontre la solucion por eso aca les cuento trabajo con Delphi 7 y Paradox. Tengo un SmDbGrid, unQry y un Upd, yo edito el SmDbGrid pero cuendo digo Applyupdate me sale el error "Update Failed" ya e probado todo y el error sigue saliendo, alguien tiene idea de que puede ser. Este es el codigo del boton modificar y guardar.

{Modificar}
if not QryCaja.IsEmpty then
begin
QryCaja.Edit;
DsCaja.AutoEdit:=True;
end;

{Guardar}
QryCaja.ApplyUpdates;
DsCaja.AutoEdit:=False;
QryCaja.Active:=False;
QryCaja.Active:=True;
QryCaja.Last;