Zapytanie SQL i biały ekran

Co zrobić jak zadaje jakieś czasochłonne zapytanie SQL i chce żeby program zrzucić do paska żeby nie było białego ekranu i żeby program reagował na cokolwiek. Wiem że do petli można wsadzić Application.ProcessMessage, ale odpalenie SQL to jedna linia Query1.Active:=True; Jak sobie z tym poradzić [???]

Uruchom zapytanie SQL w nowym wątku i po sprawie.