Как заполнить ListBox полями БД
Hi, all!
FR 2.52 BCB++ 5
В отчете создал форму диалога, положил ListBox и хочу заполнить полями из БД.
В OnActivate формы пишу:
begin
while (Not frDBDataSet1.EOF())
do
begin
ListBox1.Items.Add([DM.DataSetRep03."NAME_WP"]);
frDBDataSet1.Next;
end
end
При построении отчета ListBox заполняется одним и тем же значением, т.е. строка frDBDSet1.Next; не работает.
Подскажите, в чем причина, где ошибка?
FR 2.52 BCB++ 5
В отчете создал форму диалога, положил ListBox и хочу заполнить полями из БД.
В OnActivate формы пишу:
begin
while (Not frDBDataSet1.EOF())
do
begin
ListBox1.Items.Add([DM.DataSetRep03."NAME_WP"]);
frDBDataSet1.Next;
end
end
При построении отчета ListBox заполняется одним и тем же значением, т.е. строка frDBDSet1.Next; не работает.
Подскажите, в чем причина, где ошибка?