Скачать: CL | DM;

Как приделать progressbar, к процедуре, в цикле?   Найти похожие ветки 

← →
Delphimun   (2003-06-13 12:50) [0]

Допустем у меня цикл, скажем такой:
for i := 0 to 10000 do begin
listbox1.items.strings[i] := inttostr(a)+i;
....
end;

Как мне приделать, к нему progressbar, чтобы процент выполнения показывал?

---

← →
clickmaker ©   (2003-06-13 13:34) [1]

ProgressBar.Max := 10000;
ProgressBar.Step := 1;
for i := 0 to 10000 do begin
listbox1.items.strings[i] := inttostr(a)+i;
ProgressBar.StepIt;
end;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.44 MB
Время: 0.006 c