Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.25;
Скачать: [xml.tar.bz2];




Вниз

ProgressBar в StatusBar`е... 


tovSuhov   (2002-02-08 16:36) [0]

Люди, а как, собственно, осуществляется сабж? Хочу сделать что-то вроде Internet Explorer`ого статусбара...



McSimm   (2002-02-08 17:09) [1]

Если сделать
ProgressBar.Parent := StatusBar;

То он туда попадет.
Останется только подогнать размеры под какой нибудь Panels[X]



tovSuhov   (2002-02-08 17:29) [2]

После этого он у меня вообще пропал с формы...



McSimm   (2002-02-08 17:45) [3]

Скорее всего он лежит на Статусбаре, но за его пределами
Попробуй:
ProgressBar1.Parent := StatusBar1;
ProgressBar1.Top := 2;
ProgressBar1.Left := StatusBar1.Panels[0].Width + 2;
ProgressBar1.Height := StatusBar1.Height - 4;
ProgressBar1.Width := StatusBar1.Panels[1].Width - 4;



Alicho   (2002-02-08 19:17) [4]

var
pb: TProgressBar;
....
pb:= TProgressBar.Create(self);
with pb do begin
Parent:= StatusBar1;
Position:= 30;
Top:= 2;
Left:= 0;
Height:= StatusBar1.Height - Top;
Width:= StatusBar1.Panels[0].Width - Left;
end;
pb.Visible:= True



DMN   (2002-02-09 04:09) [5]

Чтобы не подгонять размеры прогрессбара под какую-либо панель, пользуйтесь сообщением SB_GETRECT, возвращающим прямоугольник, занимаемый какой-либо панелью статусбара.




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.25;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.014 c
6-79423           Drv                   2001-11-29 17:58  2002.02.25  
Посылка данных на E-mail Помогите....


1-79379           Grim Rider            2002-02-08 17:23  2002.02.25  
Как писать ActiveX DLL на Delphi?


3-79291           yaJohn                2002-01-31 14:26  2002.02.25  
ORDER BY - read only ??? 8-(


14-79425          Knight                2002-01-03 11:29  2002.02.25  
Господа, вопрос на засыпку! Где качнуть НОРМАЛЬНО ЛинуксРедНат? Чтобы РеГет взял закачку в зубы!


14-79426          Ajax                  2002-01-05 21:26  2002.02.25  
Драйвера под XP