Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

TStatusBar [D5, WinME]


Gayrus ©   (2001-12-17 03:52:00) 

Как в Statusbar"e вставить что-то вроде ProgressBar, как у IE
внизу?


Dmitriy(new)   (2001-12-17 09:37:00) [1]

procedure TForm1.FormCreate(Sender: TObject);
begin
Gauge2:=TGauge.Create(StatusBar1);
with Gauge2 do begin
Parent := StatusBar1;
Progress:=0;
Top := 7;
Left := 15;
Height := StatusBar1.Height - Top-3;
Width := StatusBar1.Panels[0].Width - 20;
end;
end;


KSergey   (2001-12-17 08:29:00) [2]

Это нельзя сделать в дизайнере форм. Только создавая динамически, т.е. во время выполенения программы.
Как? А как и любой другой компонент. Читайте статью на "Королевстве" "Жизнь и смерть в ржиме run-time"
Или, если нужен результат, возьмите готовую компоненту. Их горы таких! (см. архив новостей компонент. правда именно таких давно не попадалось, но в архиве найти можно запросто. ну или сразу на торри идти и выбирать статусбар по вкусу)


Gayrus   (2001-12-17 03:58:00) [3]

НЕ понял(динамически?), я пробовал положить ProgressBar сверху но если форма меняет размеры...


Builder   (2001-12-17 03:55:00) [4]

Нужно создать прогрессбар динамически, обязательно присвоить ему парента statusbar, указать положение и пользоваться.


Наверх

Титульная страница Поиск, карта сайта Написать письмо