BCB中进度条TProgressBar的使用

        在开发一些桌面应用程序时， 进度条的重要性不言而喻，我们每次在安装软件的时候， 就会有进度条。如果没有进度条， 用户会等的不耐烦的， 得罪了用户， 哪里还有什么发展机会了？不多扯， 下面， 我们来简要介绍一下BCB中的进度条（需要自己设置一下Max, Min和Step）：

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)
{
    int i = 0;
    for(i = 0; i <= 100; i++)
    {
        ProgressBar1->Position = i;
        Sleep(100);
    }
}
//---------------------------------------------------------------------------

       鉴于比较简单， 我就不截图了。