Hola
Asi de memoria por que no tengo ganas.
Código SQL
[-]
Select (sum(Ingreso.Cantidad)-Sum(Egreso.Cantidad)) as Stock From Ingreso, Egreso where Ingreso.codigo = :Cod.
No se si los parentesis estan bien o todo
![Smilie](http://www.clubdelphi.com/foros/images/smilies/smile.gif)
.
Tal vez le falta algun join y group by para hacer la suma.
![Cool](http://www.clubdelphi.com/foros/images/smilies/cool.gif)
![Stick Out Tongue](http://www.clubdelphi.com/foros/images/smilies/tongue.gif)
Saludos