reemplaza esto:
Código SQL
[-]
QueryUpdate.SQL.Text:='UPDATE productos SET stock='+DBedit3.Text+'WHERE codigo="'+txtcodigo2.Text+'"';
por esto:
Código SQL
[-]
QueryUpdate.SQL.Text:='UPDATE productos SET stock='+DBedit3.Text+' WHERE codigo="'+txtcodigo2.Text+'"';