Application->ProcessMessages()を使う