Restar, Sumar varios registros a la vez

[ecfisa]

A ver si te entendí, teniendo las tablas tbProducto, tbComponentes y tbMatPrimas sería:

tbProducto
Cuchara de acero inoxidable

tbComponentes
Hiero : 10 g.
Cromo : 2 g.
Carbono: 2,1g.

tbMatPrimas
Hiero : 100g
Cromo : 100g
Carbono: 100g

Si eliges cuchara y estando tbComponentes en relacion master/detail con tbProducto:

  with tbMatPrimas do
  begin
    Hiero:= Hierro - tbComponentes.Hierro;
    Cromo:= Cromo - tbComponentes.Cromo;
    Carbono:= Carbono - tbComponentes.Carbono;
  end;

quedando tbMatPrimas asi:
Hierro : 90g
Cromo : 98g
Carbono: 97,9g

Saludos.