[BCB] ProgressBar 用法

    ProgressBar = new TProgressBar(this);

    int StepCount;
    StepCount = 5000; 

    try
    {
         ProgressBar->Min = 0;                     // 最小值      
         ProgressBar->Max = StepCount;      // 最大值      
         ProgressBar->Step = 1;                    // (步伐) 一次加多少        
         for( int i=1; i < StepCount; i+=ProgressBar->Step )

         {

              ProgressBar->StepIt();
         }

    }
    __finally
    {
        delete ProgressBar; 

    }