Как в statusbar поместить progressbar

[Andrei Isaev]

Я пишу свой вебброузер и хочу сделать как в IE прогрессбар в строке состояния. Кто-нибудь подскажите как это сделать.Плиз.
Заранее спасибо!

[Deight]

В dynamickskinform есть статус бар в который можно много чего засунуть.

[mihali4]

Сообщение от Andrei Isaev

Я пишу свой вебброузер и хочу сделать как в IE прогрессбар в строке состояния. Кто-нибудь подскажите как это сделать.Плиз.
Заранее спасибо!

Вот вам пример. Надеюсь, под свои нужды подгоните? (я не даю абсолютно готовых ответов КОПИРОВАТЬ/ВСТАВИТЬ - так быстрее научитесь думать)

procedure TForm1.Button1Click(Sender: TObject);
begin
  with ProgressBar1 do
  begin
    Parent := StatusBar1;
    Position := 100;
    Top := 2;
    Left := 0;
    Height := StatusBar1.Height - Top;
    Width := StatusBar1.Panels[0].Width - Left;
  end;
end;