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

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

TWebBrowser - печать сразу после загрузки страницы из потока


SuperVK ©   (2002-05-17 07:11:00) 

Загружаю страницы из потока в TWebBrowser, а затем сразу отправляю на печать - вылезают белые листы.

Как я понял, это происходит потому, что хоть функция загрузки
потока в TWebBrowser.Document и прошла, однако в TWebBrowser
поток ещё не отобразился, а значит на печать отправляются белые листы.
Помогает только установка задержки, но она сильно зависит от
быстродействия компъютера. Можно ли как-нибудь побороть эту проблему?

PS1: Ловля событий типа onDownloadComplete не помогает.
PS2: Меня устроят и варианты, чтобы не TWebBrowser печатал,
лишь бы документ выводился на принтер нормально.


Владимир Васильев   (2002-05-17 10:42:00) [1]

WB.LoadFromStream(ms1);

Doc :=nil;
bod :=nil;
Doc := WB.Document as IHTMLDocument2;
while doc.readyState<>"complete" do application.ProcessMessages;

// далее уже можно работать с содержимым

bod:= Doc.Body as DispHTMLBody;//IHTMLBodyElement;


Наверх

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