Lookup y otros problemitas

[MDQRLZ]

Antes que nada quiero agradecerte por la ayuda que me estas dando , ya q aunque sean cosas faciles no habia logrado hacer que funcionen y me fueron de gran ayuda.

Lo del onkeypress esta solucionado.. asi q lo unico q me quedaria es lo del query.
Te explico que hice porq me tira un error, para ver si es algo q yo hice mal..
Coloque el query en un datamodule, donde estan el datasource y la tabla..
lo vincule con el database y el datasourse.
En la propiedad SQL fue donde escribi la sentencia de "update Productos set Stock = Stock - strtofloat(form3.edit1.text) where Producto = form1.edit1.text".
Luego donde necesito q reste el stock "datamodule2.query1.ExecSQL;"

me tira error "Capability not supported"

gracias una vez mas por tus respuestas

[epuigdef]

Buenas!



Perdona mi tardanza, pero es que no había visto que preguntabas otra cosa.



En la query no puedes referenciar a un campo de un formulario. Debes crear un parámetro y después, antes de ejecutar la select. En lugar de :


update Productos set Stock = Stock - strtofloat(form3.edit1.text) where Producto = form1.edit1.text

Debes poner:


update Productos set Stock = Stock - aramstock where Producto = aramproducto

y llamarlo de la siguiente manera:

qry.parameters.parambyName('paramstock').Value := strtofloat(form3.edit1.text);
qry.parameters.parambyname('paramproducto').Value := form1.edit1.text
qry.execsql;

Un saludo

Edu