[Edwardfeliz]

Buenas noches a todos!
espero que la pasen bien.

tengo el siguiente inconveniente, si alguno sabe como resolverlo me ayudaria:
(La idea es que el bucle recorra la base de datos (Access) y me ponga en un RichEdit los productos su cantidad sea menor a los que yo le indique, ese dato esta en la tabla de configuraciones, el campo se llama "Reordenar" ).
lo hago de la siguiente forma:

Dentro de mi tabla llamada productos, tengo un campo que es el de la cantidad existente, le llamo "Existencia" (Campo numerico), y el otro campo esta en la tabla de configuraciones y le llamo "reordenar" esto es lo que tengo hasta ahora:

Código Delphi [-]
procedure Reordenarproductos(const Parareordenar: string; Qry: TADOQuery; RE: TRichEdit);
begin
  with Qry do
  begin
    Close;
    SQL.Clear;
    SQL.Add('SELECT Descripcion, Existencia FROM Productos');
    SQL.Add('WHERE Existencia <= :Reordenar');
    Parameters.ParamByName('Reordenar').Value := Parareordenar;
    Open;
    while not Eof do
    begin
    RE.SelAttributes.Color:= Clblack;
    RE.Lines.Add('------------');
    RE.SelAttributes.Color:= Clblack;
      RE.Lines.Add(Format('%s - %s',[FieldByName('Descripcion').AsString,
        FieldByName('Existencia').AsString]));
      Next;
    end;
  end;
end;

y la llamada:

Código Delphi [-]
begin
Adoquery1.Close;
Adoquery1.Open;
RE.SelAttributes.Color:= Clblack;
RE.Lines.Add('*Articulos Que Se Agotan*');
reordenarproductos(Fconfiguracion.DBEreordenar.Text, ADOQuery2, RE);
end;

todo bien hasta ahí, pero hay un tercer campo en la tabla productos que se llama SubLinea_Producto, en este campo almaceno la sub categoria del producto, por ejemplo: Accesorios, Conectores, Etc, yo quiero que el bucle verifique si el producto tiene en la sublinea_producto: "accesorio" y ignore este producto y sigua agregando los demas que no estan en esta categoria.

porque como ustedes saben, a veces hay accesorios que solo compramos uno y dos, y no quiero que aparescan.

Saludos!