Preencher combobox com números de coleção

[geraldoleal]

tenho um listbox, e com este codigo abaixo consigo preencher o mesmo com os dados de um campo da tabela, firebird no delphi

listbox1.Items.clear;
  dm.qry_livro.First;
  While not  dm.qry_livro.Eof do begin
    listbox1.Items.add(dm.qry_livro.Fieldbyname('livro').asstring);
     dm.qry_livro.Next;
     end;

o que preciso é o seguinte. prencher um combobox com um campo da tabela. o que posso fazer usando o codigo acima. so que ai vem todos os campos que usarei para preencher o combobox. ex. numeros. digamos que cada livro é um nome de coleção. então quando chamo livro acima. preencho com os nomes das coleções. ou seja mundo america latina minas gerais amazonia etc o que preciso é preencher o combobox, com os numeros da coleção mundo (exemplo) ou amazonia. digamos que a coleção mundo tem de 1 a 20 livros. então virá no combobox os numeros de 1 a 20. tentei colocar

_sql:= ' select livro,colecao from tabela where livro = + quotedstr(edit1.text)

mais não funcionou. eu precisaria chamar o que está dentro do edit ou seja o a coleção mundo e não o campo livro como abaixo

combobox1.Items.add(dm.qry_livro.Fieldbyname('colecao').asstring);

na sql da query eu coloquei assim.

select livro,colecao from tabela where livro ='mundo'

funcionou na query.

mais não consigo jogar o resultado no combobox pegando de um edit.

se alguém puder me ajudr agradeço muitissimo.

Editado Julho 10, 2010 por Jonathan Queiroz
Modificar título para descrever melhor a dúvida conforme regra 3.6, modificar formatação conforme regra 3.7 e adicionar tag's (Jonathan)

[José Luiz]

_sql:= ' select livro,colecao from tabela where livro = + quotedstr(edit1.text)

Pelo que pude notar, faltou fechar as aspas depois do igual

_sql:= 'select livro,colecao from tabela where livro = ' + quotedstr(edit1.text)

Abraços,

José Luiz.

Editado Julho 12, 2010 por Douglas Soares
Adicionar tag CODE no post

[geraldoleal]

Boa tarde José luiz, obrigado pelo retorno, já tenei assim e não deu.

consigo preencher um combobox com dados da tabela, como pode ver acima, mais quando digo que é

os dados referentes a tal coisa dentro do campo, não vem.

sucesso

geraldo leal