|
LoadCallFile 이라는 함수가 호출되는 동안 폼에서 메시지 처리를 하지 못해서 발생하는 문제입니다.
ProgressBar의 Positions 을 변경한 다음 폼에서 메시지를 처리할 수 있도록 해주면 정상적으로 처리가 됩니다.
: FormMain->ProgressBar1->Position = OpenFileProgress;
: FormMain->StatusBar1->Panels->Items[0]->Text = IntToStr(OpenFileProgress);
이 문장 다음에
Application->ProgressMessages();
라고 써주시면 됩니다.
|