listing splash screen

     if(ProgressBar1->Position==100)

    {

    Form2->Show();

    Form1->Hide();

    Timer1->Enabled=False;

    }

    else

   {

   ProgressBar1->Position=ProgressBar1->Position+10;

   }