Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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.016 c
7-8185
wdr
2002-07-23 08:23
2002.10.03
Try..Except...


1-8033
Mazenrat
2002-09-20 15:18
2002.10.03
Активен ли таймер (SetTimer)?


3-7879
Engel
2002-09-12 18:40
2002.10.03
Работа DBASE IV в сети.


1-7943
Бегинер
2002-09-24 02:53
2002.10.03
Paskal


6-8087
skeeper
2002-08-02 13:48
2002.10.03
Заполнение формы