C++ builder运行while不卡界面怎么实现?

新手求教。编写的程序界面老卡掉，测了一下是C++ builder进入while之后程序界面就不能拖动的原因？跳出while之后程序就正常了。

这个怎么解决呢？ 

测试用button

void __fastcall TForm1::Button1Click(TObject *Sender)
{
    unsigned int count =0;
    Button1->Enabled = false;

    while(count<100)
    {
        Sleep(100);
        count++;
    }

    Button1->Enabled = true;
}