Lo del onkeypress:
procedure TFrmMntPedidos.EdtReferenciaKeyPress(Sender: TObject; var Key: Char);
begin
if key = chr(13) then
showmessage('se ha pulsado enter');
end;
lo del query:
update tabla set stock = stock - paramstock where codigo = paramcodigo
Se supone que tienes una tabla que se llama "tabla" con un campo que se llama "codigo" que tiene la clave principal del código de artículo a actualizar y otro campo que se llama "stock" que tiene el stock del artículo.
Se le pasa un parámetro paramstock con la cantidad a restar y otro parámetro paramcodigo que tiene el código del artículo.
La consulta se "lee" de la siguiente manera:
"actualiza la tabla "tabla" y asigna al campo stock lo que tenga menos el paramstock en los registos culo campo "codigo" valga "paramcodigo""
Espero que te sirva.
Edu
|