Текущий архив: 2002.10.03;
Скачать: 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 вся ветка
Текущий архив: 2002.10.03;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.027 c
