[spike]

при выполнении функции все равно приложении будет занято этим, т.е. выполнением функции

имхо надо юзать:
Application->ProcessMessages();