Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Печать HTML страницы [D6]

RazorbladE © (2002-12-03 13:03:00)
Люди! Необходимо из своей программы распечатать HTML файл.
Подскажите где можно взять компоненту (типа THtmlLite), но с
поддержкой печати? Или какой нибудь другой способ.

Заренее спасибо.

Кулюкин Олег (2002-12-04 11:53:00) [1]
2 Дмитрий К.К. © (03.12.02 14:17)
> Сделай сам такой пример, вызови процедуры печати, а потом нажми "Отмена". Хочешь угадаю ошибку? ;)
Знаю я эту ошибку.
Поэтому я и поставил печать в try...except :)))

Дмитрий К.К. (2002-12-03 14:24:00) [2]
2Ihor Osov"yak

Мы же с Вами его тогда разбирали.

Ihor Osov'yak (2002-12-03 14:19:00) [3]
2. Дмитрий К.К. © (03.12.02 14:17)
да, есть таког баг. Во всяком случае для IE5.XX. Для шестого не проверял ....

Дмитрий К.К. (2002-12-03 14:17:00) [4]

> Кулюкин Олег ©

Сделай сам такой пример, вызови процедуры печати, а потом нажми "Отмена". Хочешь угадаю ошибку? ;)

Song (2002-12-03 14:13:00) [5]
Да просто ShellExecute() и ничего больше не надо.

Кулюкин Олег (2002-12-03 13:38:00) [6]
2 Дмитрий К.К. © (03.12.02 13:35)
???

Дмитрий К.К. (2002-12-03 13:35:00) [7]
А вот здесь грабли лежат.

Кулюкин Олег (2002-12-03 13:23:00) [8]
Можно загрузить страницу в TWebBrowser (входит в поставку дельфей) и респечатать.
Вот функция, которой я пользуюсь для печати.
PrintWithSetup - выводить ли окно "Свойства печати"

procedure mrWebBrowserPrint(AWB : TWebBrowser; PrintWithSetup : boolean);
var
A, B: OleVariant;
UserAction: Cardinal;
begin
if PrintWithSetup then
UserAction := OLECMDEXECOPT_PROMPTUSER
else
UserAction := OLECMDEXECOPT_DONTPROMPTUSER;
try
AWB.ExecWB(OLECMDID_PRINT, UserAction, A, B);
except
end;
end;

Наверх

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