안녕하세요..
다음과 같은 code를 쓰고 있는데요..

void __fastcall TfrmMain::bbtnInitClick(TObject *Sender)
{

    Screen->Cursor = crHourGlass;

    //중간 code

    Screen->Cursor = crDefault;
}

위의 중간 code가 실행되는 동안 crHourGlass로 cursor가 고정되어 있으면 좋겠는데
제가 지금 사용중인 포뮬러원이라는 콘트롤 위에만 가면  아직 중간 code가 실행
중인데도 cursor가 포뮬러원 cursor로 변해버리네요..

이거 어떻게 crHourGlass로 고정할수 있는 방법없을까요?