Всем добрый день. Подскажите что не так делаю. Есть таблица структуры дерево, в ней поля под названием "R_Num" "R_Parent" "R_Name" и т.д. Парент это соответственно родитель, если нету у раздела родителя тоесть 0, то это главный раздел. Хочу пройтись по всем записям в таблице и где родитель = 0, тоесть называния главных разделов, хочу добавить в список. Но курьез в том что в список добавляется только первый найденый результат. Скрин прилагаю... и вот код:
Код:
1 2 3 4 5 6 7 8 9 | tRazdels . First;
while not tRazdels . Eof do
begin
If tRazdels[ 'R_Parent' ]<> 0 then Exit
else
b:=tRazdels[ 'R_Name' ];
ComboBox3 . Items . Add(b);
tRazdels . Next;
end ;
|
