[VitalyAkiev]

Вопрос. Можно ли создать что-то вроде ProgressBar в одной из панелей StatusBar?

[Страдалецъ]

Если очень кратко то.. Можно.

[Aristarh Dark]

Можно именно ProgressBar туда поместить.
Вот пример из drkb:

Код:

var pb: TProgressBar;
{©Drkb v.3(2007): www.drkb.ru}
begin
....
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;  //with;
pb.Visible:= True;
....
end; 

[VitalyAkiev]

А как можно изменить цвет ProgressBar?

[VitalyAkiev]

Сам разобрался. Спасибо за помощь.