Pasek postepu

0

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ć.

0

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

0

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.

0

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

0

a

Application.ProcessMessages;

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

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0