Форум: "Базы";
Текущий архив: 2002.01.28;
Скачать: [xml.tar.bz2];
Вниз
ProgressBar Найти похожие ветки
← →
Ross (2001-12-24 21:58) [0]Есть база данных. Добавлении в Treeview данных из поля происходит за несколько секунд. Хотелось бы связать это все с ProgressBar-ом. Помучался, но не знаю как. Знаю что просто. Подскажите.
Спасибо.
← →
SergVlad (2001-12-24 22:38) [1]Получить N := DataSet.Recordcount; (TQuery или TTable или..)
ProgressBar.Max := N;
В цикле
for i:= 1 to N do
..
ProgressBar.Position := i;
DataSet.Next;
..
← →
Deniz (2001-12-25 07:10) [2]...
ProgressBar.Position := i;
DataSet.Next;
Application.ProcessMessages
PS:Такой FOR использовать не логично, лучше while not DataSet.eof do
← →
Vadim (2001-12-25 10:06) [3]Вот другой подход, простой и эффектный: принудительно перерисовываешь дерево каждый раз, когда добавляется новый корневой узел (или узел первого уровня, если корневой один). Из TreeView получается своеобразный ProgressBar.
← →
Ross (2001-12-25 11:03) [4]To Vadim
Interesno, poprobuiu. Spasibo
To All
Spasibo
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2002.01.28;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.009 c
