Fórum Tabela em listbox #172598
01/08/2003
0
Amigos,
Como faço para listar os registros de um campo de uma tabela em uma list box.
Estou acessando a tabela através de uma query e estou usando o seguinte código...só que na list só aparece o primeiro registro
Obrigado,
Wellington
if dm.qAnoProp.eof=false then
begin
lstAnop.Items.Add(dm.qAnoProp.Fieldbyname(´ano_prop´).AsString);
end
else
lstAnop.Items.Clear;
exit;
Como faço para listar os registros de um campo de uma tabela em uma list box.
Estou acessando a tabela através de uma query e estou usando o seguinte código...só que na list só aparece o primeiro registro
Obrigado,
Wellington
if dm.qAnoProp.eof=false then
begin
lstAnop.Items.Add(dm.qAnoProp.Fieldbyname(´ano_prop´).AsString);
end
else
lstAnop.Items.Clear;
exit;
Sheudas
Curtir tópico
+ 0
Responder
Posts
01/08/2003
Aroldo Zanela
Colega,
Use DBListBox neste caso. É mais fácil, pois já possui datalink.
No seu código o erro é a falta de uma estrutura de controle de laço, como um while..not.eof..do
Use DBListBox neste caso. É mais fácil, pois já possui datalink.
No seu código o erro é a falta de uma estrutura de controle de laço, como um while..not.eof..do
lstAnop.Items.Clear; dm.qAnoProp.First; while not dm.qAnoProp.eof do begin lstAnop.Items.Add(dm.qAnoProp.Fieldbyname(´ano_prop´).AsString); dm.qAnoProp.Next; end;
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)