No se porqué puede fallar, pero creo que una mejor opción es dejar que SQL se encargue de todo.
Recorres como lo haces hasta ahora y ejecutas el SQL que incremente la cantidad:
Código SQL
[-]
UPDATE ARTICULOS
SET
CANTIDAD = CANTIDAD + :INCREMENTO,
FECHA_INGRESOART= :FECHA_INGRESOART
WHERE
ID_ARTICULO = :ID_ARTICULO';
Esto es solo un SQL en una transacción. Evita que tengas que hacer cálculos en Delphi, traer el stock actual.