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.