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

Progress в Status Bar   Найти похожие ветки 

← →
Wolverin ©   (2002-09-20 17:38) [0]

Как отобразить прогресс в статус баре?

---

← →
Reindeer Moss Eater   (2002-09-20 17:53) [1]

procedure TProgressBar.PaintTo(DC: HDC; X, Y: Integer);

---

← →
Link   (2002-09-20 18:02) [2]

ProgressBar1.StepBy(100);

Можно распределить по процедуре, написав несколько раз эту строчку, но сотню распределить по количеству строчек.
100 - это проценты от ProgressBar.

---

← →
Алексей Ким ©   (2002-09-20 18:11) [3]

можно использовать панели тогда можно делать панель с другим цветом
как статус бар

---

← →
Reindeer Moss Eater   (2002-09-20 18:52) [4]

Дополнение :
DC:=GetDC(StatusBar1.Handle);
SBar.Panels[N].Style:=psOwnerDraw;
X и У - координаты, что бы попасть на нужную Panels[N]

---

← →
Link   (2002-09-20 19:08) [5]

Сори за ошибку...
Только щас заметил, что тут о StatusBar, а не о ProgressBar


> Reindeer Moss Eater

!)

---

← →
Толик ©   (2002-09-20 19:43) [6]


with(ProgressBar1)do begin
Parent := StatusBar1;
Left := 0;
Top := 0;
end;

На мой взгляд это наиболее элегантное решений.

---

← →
jones   (2002-09-23 09:43) [7]

в развитие последнего предложения можно сделать свой компонент и юзать его как захочеться. возьми базовый statusbar за основу и в его конструктор добавь
ControlStyle = ControlStyle << csAcceptsControls;
(енто в билдёре, на дельфях сам сориентируешься)
потом пожешь на statusbar кидать все что хочешь

__fastcall TMyStatusBar::TMyStatusBar(TComponent* Owner)
: TStatusBar(Owner)
{
ControlStyle = ControlStyle << csAcceptsControls;
}

---

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

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



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