descontar mercancia de una tabla a otra

[elsamurai]

saludos a todos,estoy terminado un pequeña aplicacion que tendra el fin de registrar todas las mercancia que la empresa compre y venda,tendo dos tablas hechas en access y tengo el siguiente problema,pense que lograr descontar la mercancia vendida en una tabla de otra era algo parecido a una calculadora y asi lo hice,despues de calcular se graba y no me da ningun error,pero la mercancia en la otra tabla no se reduce,alguien me explica cual es mi error

Código Delphi [-]
procedure TFRMCLIENTES.ToolButton4Click(Sender: TObject);
var
 valor1,valor2,resultado:integer;
begin
  inherited;

  begin
  valor1:=strtoint(dbedit9.text);
  valor2:=strtoint(dbedit10.text);
  resultado:=valor1-valor2;
  dbedit9.text:=inttostr(resultado);
  end ;
if dm.adocliente.State=dsinsert  then
begin
dm.adocliente.Post;
dm.adocliente.Refresh;
dm.ADOPRODUCTO.Open;
dm.ADOPRODUCTO.Refresh;
dm.adoproducto.Close;
end
else
IF DM.ADOcliente.State=DSEDIT THEN
BEGIN
DM.ADOcliente.Post;
DM.ADOcliente.Refresh;
dm.adoproducto.Open;
dm.adoproducto.refresh;
dm.adoproducto.close;
END
ELSE
begin
showmessage('no se encuentra en estado de insercion')
end;

las tablas tablas adoproducto tube que abrirla y cerrarla manualmente porque tengo un codigo en el evento onclose para que se cierre,espero que alguien pueda ayudarme

[[Caral]]

Hola
No entiendo
Saludos

[Casimiro Noteví]

Ese código no hace nada de lo que dices que quieres hacer
Si en una tabla tienes el campo "stock" y vendes 2 unidades de un artículo, tendrás que buscar ese artículo y descontar su stock, o sea, si en el campo stock tienes 100 unidades y has vendido 2, entonces haces algo así como:
cambia stock por stock -2
Eso traducido al lenguaje sql, delphi o lo que estés usando.

Originally Posted by Caral

Hola
No entiendo
Saludos

Creo que vas a tener que pasarle alguno de tus tutoriales o programas de ejemplo

[elsamurai]

podrias dejar algunos codigo de ejemplo para guiarme,y me imagine que ese codigo no haria nada de lo que queria,como dije arriba pense que seria como una calculadora y despues que guardara los resultados

[Casimiro Noteví]

Disculpa, pero no entiendo lo que quieres decir

Te aconsejo que leas nuestra guía de estilo, gracias.

[[Caral]]

Hola
Para ayudar hace falta que nos ayudes.
Si no nos das datos es dificil entender.
Por ejemplo:
En la tabla 1 tengo estos campos
En la tabla 2 tengo estos.
Quiero que al hacer una operacion X me descuente de la tabla 1 y me agregue en la tabla 2.
Tambien hay que recordar que ya casi estamos en navidad, asi que no olvidar:
Quiero que me obsequien un codigo parecido al que quiero hacer.
Quiero un ordenador con mas memoria
etc., etc.
Saludos