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]);