Hola, gracias por turespuesta he probado el codigo que me has dado
Código Delphi
[-]
Query2.Close;
Query2.SQL.Clear;
Query2.SQL.Add('UPDATE Productos SET Existencias = Existencias - :Cantidad WHERE UPPER(Clave) LIKE UPPER(:Clave)');
Query2.ParamByName('Cantidad').AsFloat := Table3.FieldByName('Cantidad').AsFloat;
Query2.ParamByName('Clave').AsString := Table3.FieldByName('Clave').AsString;
Query2.Open; // Usa este método en lugar de Open
Pero me da este error:
Error creating cursor handle
Alguien podría ayudarme en esto?
Gracias de antemano