Ver Mensaje Individual
  #2  
Antiguo 28-05-2015
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
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
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita