Скачать: CL | DM;

Помогите с ProcessMessagees!   Найти похожие ветки 

← →
ton2   (2002-10-30 18:29) [0]

Проблема вот в чем. Посылаю содержимое формы на печать. Вот отрывок кода:
for I := Beg to End do
begin
pageControl1.ActivePage:=(PageControl1.Pages[i]);
Application.ProcessMessages;
Form1.Print;
end;
то время пока форма посылается на печать (а длится это до минуты) форма остается мертвой не реагируя ни на что несмотря на ProcessMessages. Как заставить форму проснутся?

---

← →
Darts   (2002-10-30 18:35) [1]

End - reserved word. Код вообще работать не будет.

---

← →
ton2   (2002-10-30 18:45) [2]

Darts: это примерный отрывок конечно же переменную End объявить delphi не даст. если можно - по существу вопроса. заранее благодарен.

---

← →
pas_andry ©   (2002-10-30 19:06) [3]

Вообще-то Application.ProcessMessages; ставиться в начале цикла и в конце, т.е:

for i=1 to 5 do
begin
Application.ProcessMessages;
//Твой код
..............
Application.ProcessMessages;
end;
У меня это проекрасно работает, попробуй, может поможет!

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.01 c