Как поместить ProgressBar в StatusBar?

Здравствуйте KBH, Вы писали:

KBH>Как поместить ProgressBar в StatusBar?

Блин, "уж сколько раз твердили миру"! Мало того, что вопрос задан не в том форуме. Так ведь и ответ может быть получен мгновенно, путем просмотра списка Q&A на этом сайте.
http://www.rsdn.ru/qna/?ui/sbpi.xml

Здравствуйте KBH, Вы писали:

KBH>Как поместить ProgressBar в StatusBar?

Этот вопрос или форум WinApi, или MFC, или ATL/WTL...

Здравствуйте DarkGray, Вы писали:

DG>Этот вопрос или форум WinApi, или MFC, или ATL/WTL...

А смотря на чем пишешь.

Что вы такие нервные? Больше не буду.
А вот мой переработанный вариант под C++Builder 5.

TfmMain *fmMain;
void ShowProgress()
{
  TProgressBar *ProgressBar = new TProgressBar(fmMain->StatusBar->Handle);
  ProgressBar->Parent = fmMain->StatusBar;
  ProgressBar->Align = alClient;
  ProgressBar->Min = 0;
  ProgressBar->Max = 100;
  for (int i = ProgressBar->Min; i <= ProgressBar->Max; i++) {
    Sleep(30);
    ProgressBar->Position = i;
  }
  delete ProgressBar;
}

Здравствуйте KBH, Вы писали:

KBH>Что вы такие нервные? Больше не буду.

Да тут поневоле нервным станеш

Здравствуйте KBH, Вы писали:

KBH>Как поместить ProgressBar в StatusBar?
Очень просто.
Бросаешь ProgressBar на форму в любое место. Для StatusBar создаешь TStatusPanel и для этой панели в Style указываешь psOwnerDraw
В конструкторе формы
ProgressBar->Parent = StatusBar;
Определяешь событие StatusBar OnDrawPanel
void __fastcall TMyForm::StatusBarDrawPanel(TStatusBar *StatusBar,
TStatusPanel *Panel, const TRect &Rect)
{
if (Panel->Index == 0) // это для первой левой панели
{
ProgressBar->SetBounds(Rect.Left — 1, Rect.Top — 1, Rect.Right — Rect.Left + 2,
Rect.Bottom — Rect.Top + 2 );
}
}
В рантайме ProgressBar будет показываться в StatusBar.