UPDATE Syntax Error

[[Caral]]

Hola
Nos das solo eses codigo, no sabemos que hay delante de el. especulando:

Código Delphi [-]
var articulo: String;
     cantidad: Real;
begin
  ZQuery1.slq.text:= 'Select * from TablaArticulos';
  ZQuery1.open;
  ZQuery1.First;//Te posicionas en el primer registro
  // datos en variables
  Articulo:=  ZQuery1.Fields[0].AsString;
  Cantidad:= ZQuery1.Fields[1].AsString;
  // cierro la tabla
  ZQuery1.Close;

  ZQuery1.SQL.Text:= 'Update Inventario Set Stock = Stock - '+Cantidad+' Where Articulo = '+Articulo;
  ZQuery1.ExecSQL;
  end;

Saludos