Actualizar Stock

[aledieb]

Proba con, no se si funcionará:

Código SQL [-]
Update Producto Set Pro_Stock=Pro_Stock+:valor

Código Delphi [-]
IBQ_Stock.Params[0].AsInteger:=StrToInt(Items_Paso.Cells[1,i]);

Otra opción seria utilizar una variable auxiliar asignarle el valor del campo y luego hacer el update:

Código SQL [-]
Update Producto Set Pro_Stock=:valor

Código Delphi [-]
variable_aux:=IBQ_Stock['Pro_Stock'];
IBQ_Stock.Params[0].AsInteger:=variable_aux+StrToInt(Items_Paso.Cells[1,i]);