![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
progressbar в statusbar
ГореПрограммер © (2006-09-14 11:07:00)Здравствуйте, каким образом можно отображать ход некого процесса путем использования какого- нибудь pogressbar-а в statusbar-е ?
IceBeerg (2006-09-14 11:43:00) [1]Ой горющко... поиск рулит прям по строке сабжа...
http://sm.aport.ru/scripts/template.dll?Tn=9&r=progressbar+%E2+statusbar
вторая же ссылка
http://www.delphiworld.narod.ru/base/progressbar_to_statusbar.html
третья ссылка
http://www.forum.vingrad.ru/index.php?showtopic=1297
седьмая ссылка
http://www.megalib.com/books/923/a56.htm
Elen (2006-09-14 11:41:00) [2]
> ГореПрограммер
отображать ход некого процесса путем использования какого- нибудь pogressbar-а (а точнее изменяя его свойство position) в statusbar-е.
ГореПрограмист (2006-09-14 11:40:00) [3]
procedure TForm1.FormCreate(Sender: TObject);
begin
StatusBar1.Panels.Add;
StatusBar1.Panels[0].Width:= 100;
with ProgressBar1 do
begin
Parent := StatusBar1;
Position := 100;
Top := 2;
Left := 0;
Height := StatusBar1.Height - Top;
Width := StatusBar1.Panels[0].Width - Left;
end;
end;