Progressbar im Statusbar anzeigen

__fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner)
{
    ProgressBar1->Parent = StatusBar1; //Statusbar, auf dem der Progressbar gezeichnet werden soll
    ProgressBar1->Top = 2;             //Position im Statusbar
    ProgressBar1->Left = 2;
}