Checa el codigo que acabo de poner, yo creo que es la solución.
De todos modos lo pongo de nuevo con los objetos que estas usando.
Código Delphi
[-]
QueryUpdate.SQL.Text :='UPDATE productos SET stock= '+
QuotedStr(inttostr(strtoint(DBedit3.Text)+strtoint(DBedit3.Text)))+
' WHERE codigo='+txtcodigo.Text;
Cita:
|
Empezado por karlaoax
Me marca un error en: QuotedStr(txtcodigo.Text)+'"'
Incompatible types: 'String' and 'Integer'
|
El problema es que estas pasando el valor de codigo asi "123" y eso es un string no un entero.
Salud OS.