| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Помогите с ProcessMessagees! [D6]
ton2 © (2002-10-30 18:29:00)Проблема вот в чем. Посылаю содержимое формы на печать. Вот отрывок кода:
for I := Beg to End do
begin
pageControl1.ActivePage:=(PageControl1.Pages[i]);
Application.ProcessMessages;
Form1.Print;
end;
то время пока форма посылается на печать (а длится это до минуты) форма остается мертвой не реагируя ни на что несмотря на ProcessMessages. Как заставить форму проснутся?
pas_andry (2002-10-30 19:06:00) [1]Вообще-то Application.ProcessMessages; ставиться в начале цикла и в конце, т.е:
for i=1 to 5 do
begin
Application.ProcessMessages;
//Твой код
..............
Application.ProcessMessages;
end;
У меня это проекрасно работает, попробуй, может поможет!
ton2 (2002-10-30 18:45:00) [2]Darts: это примерный отрывок конечно же переменную End объявить delphi не даст. если можно - по существу вопроса. заранее благодарен.
Darts (2002-10-30 18:35:00) [3]End - reserved word. Код вообще работать не будет.
| |
