Текущий архив: 2006.02.19;
Скачать: CL | DM;

Вниз

TLabel   Найти похожие ветки 

← →
HITMAN ©   (2006-02-04 19:40) [0]

       for I:=1 to FMsgCount do
              begin
               LabelLLOAD.Caption:=inttostr(I);
               Gauge1.Progress:=I;
               IdPOP31.Retrieve(I,IdMessage1);
               NumberMessages1:=NumberMessages1+1;
                 IdMessage1.SaveToFile
"C:\MSG\IN_BOX\msg_"+inttostr (NumberMessages1)+".msg",false);
               IdMessage1.Clear;
              end;

Подскажите очень простую весчь, почему во время форы не обновляется LabelLLOAD.Caption:=inttostr(I);

как сделать так, чтобы обновлялся???

---

← →
ssk ©   (2006-02-04 19:43) [1]

поставь в цикле после begin Application.ProcessMessages;

---

← →
HITMAN ©   (2006-02-04 19:46) [2]

Это значит, что цикл прерывается для обновления каждой строки???

---

← →
HITMAN ©   (2006-02-04 19:48) [3]

Спасибо, работает....

---

← →
Desdechado ©   (2006-02-04 19:49) [4]

http://delphimaster.net/view/2-1139064527/

---

Страницы: 1 вся ветка

Текущий архив: 2006.02.19;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.05 c