"Замерзание" окна. Помогите с потоками.

Приветствую.

Задача: есть программа работающая с базами данных, выполняющая много долгих транзакций (в среднем от 15 до 60 секунд) на протяжении этого времени форма приложения «замерзает» и временами не успевает перерисовывать некоторые элементы окна, что создает для пользователя ощущение «зависания», с которым он частенько расправляется доступными в ОС средствами...

Вопрос: Как бы сделать так, чтобы на время выполнения транзакции выводить небольшое окошко с какой-нибудь лабудой, показывающей что программа работает, но окошко – модальное (т.е. чтобы пока оно не закроется юзер не мог ничего ткнуть в основной форме)? Хотелось бы что-то простое и рациональное, код типа

[Подготовка транзакции]

Form->Show();

[транзакция]

Form->Close();

Использовать метод ShowModal() как я понял нельзя, т.к. в этом случае программа ждет закрытия формы, а переносить функциональность [транзакции] в модальную форму не хочется, т.к. транзакций много, а форма для них нужна только одна и выдирать теперь участки кода из разных частей и переносить их в нее лень... 

Есть идеи? Может кто чего другое подскажет по управлению экраном в таких ситуациях? Прибегать к усложнению типа создания Threads тоже не хотелось бы.

Заранее благодарен за любые дельные советы.