Witam,
korzystam z progress-barów w delphi xe2. Niestety nie pasuje mi ich animacja (w dephi 7 tego nie było - po ustawieniu progresa od razu pokazywał żądaną wartość). Niestety w xe2 progressbar jest animowany i 'dochodzi' do żądanej wartości powoli:
Przykład:
procedure TForm1.Button1Click(Sender: TObject);
begin
ProgressBar1.Position:= Progressbar1.Max;
Application.ProcessMessages;
ShowMessage('w tym momencie prgsbar wcale nie ma maxa!');
end;
Najgorzej jest, gdy zamiast showmessage z powyższego przykładu np. zamykam okno. W rezultacie progres nie zdążył
dojść nawet do połowy!!! mimo że jego pozycja była ustawiona na maxa. Nie pomogło oczywiście nawet application.processmessages (to mnie akurat wcale nie dziwi w tej sytuacji).
Moje pytanie:
czy jest jakaś właściwość bądź zdarzenie, które mi w tym pomogą (poczekam na zdarzenie aż prgsbar 'dojdzie' i dopiero wyświetle komunikat lub zamknę okno ???).
Proszę nie pisać coś w stylu pętli czasowej + application.processmessages -> to jest lamerskie rozwiązanie, które
znam od wieków i nijak się ono ma do programowania obiektowego. Interesuje mnie tylko obiektowe rozwiązanie tego trywialnego problemu.
Dzięki z góry.