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

Работа с компонентами Delphi   Найти похожие ветки 

← →
SunriseGirl   (2007-06-13 15:23) [0]

Кто знает как работать с TProgressBar? Потому что вот такой код не работает:
 ProgressBar1.Max := 32;
 for i := 1 to 32 do
   ProgressBar1.Position := I
Вообще ничего не отображает.
А я хочу чтобы было видно скока процентов и показывало или сплошной линией или полосочками

---

← →
Сергей М. ©   (2007-06-13 15:35) [1]

> Вообще ничего не отображает


Отображает)
Просто оч быстро, со скоростью работы цикла)

---

← →
PZ   (2007-06-13 15:47) [2]

ProgressBar1.Position := Round((I/32)*100);

---

← →
Сергей М. ©   (2007-06-13 15:59) [3]

> PZ   (13.06.07 15:47) [2]


Мдя ...

---

← →
Exile   (2007-06-13 16:15) [4]

ProgressBar1.Max := 32;
for i := 1 to 32 do
begin
  ProgressBar1.Position := I;
sleep(100);
end;

вот так ты все увидишь, а так как ты написал..., ты просто невидишь ничего, все происходит быстро :)

---

← →
sniknik ©   (2007-06-13 16:17) [5]

with ProgressBar1 do begin
 Max:= 32;
 for i:= 1 to 32 do begin
   Position:= i;
   Application.ProcessMessages;
   Sleep(1000);
 end;
end;

проценты за отдельную плату...

---

← →
Exile   (2007-06-13 16:24) [6]

Удалено модератором

---

← →
Сергей М. ©   (2007-06-13 16:32) [7]

Удалено модератором

---

← →
Exile   (2007-06-13 16:38) [8]

Удалено модератором
Примечание: Правила читаем и уважаем

---

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

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



Память: 0.46 MB
Время: 0.015 c