problemas al filtrar datos desde combobox

[ecfisa]

Hola elisma22, bienvenido a Club Delphi

Como es costumbre con los que ingresan, te invitamos a leer nuestra guía de estilo.


El problema es que en la consulta SQL declaras un parámetro, pero en ningún momento le das un valor. Lo que le asignes a la variable "nombre" no tiene relación alguna con el parámetro "NOMBRE" que está dentro de la consulta SQL.

Debería ser:

Código Delphi [-]
procedure TTF_articulos.ComboBox1Change(Sender: TObject);
begin
  with modulo1.MyQuery_articulos do
  begin
    Close;
    SQL.Clear;
    SQL.Add('SELECT AR.ID_ARTICULO, AR.NOMBRE_ARTICULO, RU.NOMBRE_RUBRO, AR.PRECIO, AR.DESCRIPCION');
    SQL.Add('FROM ARTICULOS AR INNER JOIN RUBROS RU ON AR.ID_RUBRO = RU.ID_RUBRO');
    SQL.Add('WHERE RU.NOMBRE_RUBRO LIKE :NOMBRE');
    ParamByName('NOMBRE').AsString := ComboBox1.Items[ComboBox1.ItemIndex]+'%'; // asignación al parámetro
    Open;
  end;
end;

Saludos