[[poliburro]]

Código Delphi [-]

begin

articulosquery1.Close;
articuloquery1.SQL.Text:= 'update equipos set existencia = existencia'+ FacturaQuery1cantidad.AsString;
FacturaQuery1.ExecSql;
end;