Comprobar en un while not eof si tiene stock un producto

[Petolansa]

Buen consejo, lo que hago es cuando va a buscar el articulo a agregar coloreo la fila del dbgrid si el stock esta bajo el minimo o en 0.
Otra cosa que me esta matando, me pasa que cuando quiero pasar datos entres queryes o tablas temporales no se como comprobar si el producto ya existe en esa tabla. O sea quiero que cuando selecciono un pdoducto, comprobarn si esta, si esta que me muestre un mensaje que diga, ese producto ya existe, sino que me lo agrege. Como seria si quiero pasar uno y com seria si quiero pasar varios datos juntos.
Estuve intentando lo siguiente, que obviamente no funciona.
En este caso es una nota de credito, que lo que hago es ir agregando los productos que se va a realizar la devolucion de mercaderia.

Código Delphi [-]
WHILE NOT mddevolucion.eof do
  begin
  if mddevolucioncodipro.Value:=query2codipro.Value
    then showmessage('Producto ya existe');
  else
    mddevolucion.Append;
    mddevolucioncodipro.Value:=query2codipro.Value;
    mddevolucioncantidad.Value:=query2cantidad.Value;
    mddevolucionconcepto.Value:=query2concepto.Value;
    mddevolucionprecio.Value:=query2precio.Value;
    mddevolucionprecioneto.Value:=query2precioneto.Value;
    mddevolucion.Next;
  end;

end.

Esto me da expression must be boolean y me salta que es showmessage.

Saludos! Espero puedan ayudarme