Dudas con un DBlistbox

[rufo]

Buenas tardes amigos antes que nada quiero desearles anticipadamente una feliz navidad y un mejor año nuevo.

Bueno les comento que estoy haciendo un programa en el cual quiero meterle a un edit un codigo de productos y cuando le ingrese dicho codigo me visualiza tanto la imagen del producto, nombre y precio, mi problema radica en cuando meto dicho codigo solo me visualiza la imagen y no me muestra el nombre del producto ni el precio, estoy utilizando un edit para ingresar el codigo y dos DBlistbox en el cual ya esta conectados al datasource y al datafield de sus propiedades, les anexo el codigo que estoy usando

Este codigo es el que esta en el evento Onkeypress del edit

procedure TPunto_venta.Edit1KeyPress(Sender: TObject; var Key: Char);
Var
  LCad :String;
begin
 with dm1.Q_codigos do
  begin
  LCad :='%'+Edit1.Text+'%';
  SQL.Text:='SELECT codigo,producto,foto,precio_unidad FROM codigos WHERE codigo LIKE :''N'';';
  ParamByName('N').AsString:=LCad;
  Open;
  end;

end;

Este codigo siguiente esta en el evento Onkeyup

DBImage1.Picture.LoadFromFile(dm1.Q_codigos.fieldbyname('foto').asstring);
 dblistbox1.Items(dm1.Q_codigos.FieldByName('producto').asstring);// aqui es donde no me muestra el nombre del producto

O tambien si me pueden ayudar en como hacerlo o con que otros objetos, gracias de antemano y estoy usando delphi 5.

[Aleca]

por lo q entendí pondria un DBEdit ó un DBText para el campo producto.

[rufo]

Gracias amigo aleca ya le puse el objeto DBedit pero sigo en lo mismo no me quiere mostrar el nombre del producto.????

[Aleca]

Empezado por rufo

Gracias amigo aleca ya le puse el objeto DBedit pero sigo en lo mismo no me quiere mostrar el nombre del producto.????

se me ocurre q podrias poner una dbgrid para ver el resultado de la consulta asi ves si estas encontrando lo q buscas.

[rufo]

Gracias amigo Aleca pero ya probe poniendo undbgrid y me devuel lo que estoy solicitando lo que tengo problema es que no me muestra el nombre del producto en un dblistbox entonces si estoy en incognita...