Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как правильно рефрешить?


syte_ser78 ©   (2005-08-26 09:20:00) 

Есть форма которую вызываю методом showmodal
По онклику одной из кнопок обновляю базу и вывожу в лабел имя обновленной записи

     while not tbl_update.Eof do
        begin
 ........тут собсно обновляю
               ProgressBar1.Position:=ProgressBar1.position+1;
               frm_update.Form4.Label4.Caption:=тут_пишу
               label4.refresh;
               tbl_update.Next;
        end;

Проблемма в том что примерно секунд через пять обновления, лабел становится белый в кепшине формы-"программа не отвечает", курсор становится часами. Но обновление продолжается - прогрессбар ползет.

В чем ошибка?


Anatoly Podgoretsky   (2005-08-26 12:36:00) [1]

Потому что не обрабатываешь сообщения Виндоус, для системы ты завис. Ты еще проведи поверх окном другого приложения, совсем инфаркт получишь.


alex_***   (2005-08-26 09:42:00) [2]

Application.ProcessMessages давай через какое-то кол-во итераций


Наверх

Титульная страница Поиск, карта сайта Написать письмо