Pasek postepu

Witam
Sytuacja wygląda następująco. Na jednej formie (głównej) odpalam jakąś procedure która ma sie wykonywać. Przebieg operacji z tej procedury obrazuje pasek postepu który otwierany jest w osobnym oknie i aktualizowany na bieżaco. Uzytkownik może przerwac proces za pomocą przycisku umieszczonego na formie z paskiem. W tym czasie forma główna jest blokowana (przy tworzeniu paska) Kod aktualizacji paska wygląda następująco:

glFrmPasek.labOpis.Caption := pmTekst;
glFrmPasek.pbPasek.Position := pmPostep;
glFrmPasek.BringToFront;
Application.ProcessMessages;
// jesli stop
if glStopPasek then
begin ...

Problem w tym ze na wolnych komputerach forma główna jest momętami odblokowywana (nie wiem czemu). Moze ktoś ma pomysł jak sie tego pozbyć.

Utwórz glFrmPasek jako formularz modalny (o ile dobrze zrozumiałem twoje momentalne odblokowywania formy głównej)

To niestety nie rozwiazuje mojego problemu. Jak napisalem na formie głownej ma się wtedy wykonywać niezależny proces. A jesli uruchomie w trybie modalnym to ten proces zostanie zatrzymany.

Czuję, że bez wątków się nie obejdzie.

a

Application.ProcessMessages;

????????????