Форум: "Основная";
Текущий архив: 2002.12.12;
Скачать: [xml.tar.bz2];
Вниз
Печать HTML страницы Найти похожие ветки
← →
RazorbladE (2002-12-03 13:03) [0]Люди! Необходимо из своей программы распечатать HTML файл.
Подскажите где можно взять компоненту (типа THtmlLite), но с
поддержкой печати? Или какой нибудь другой способ.
Заренее спасибо.
← →
Кулюкин Олег (2002-12-03 13:23) [1]Можно загрузить страницу в 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;
← →
Дмитрий К.К. (2002-12-03 13:35) [2]А вот здесь грабли лежат.
← →
Кулюкин Олег (2002-12-03 13:38) [3]2 Дмитрий К.К. © (03.12.02 13:35)
???
← →
Song (2002-12-03 14:13) [4]Да просто ShellExecute() и ничего больше не надо.
← →
Дмитрий К.К. (2002-12-03 14:17) [5]
> Кулюкин Олег ©
Сделай сам такой пример, вызови процедуры печати, а потом нажми "Отмена". Хочешь угадаю ошибку? ;)
← →
Ihor Osov'yak (2002-12-03 14:19) [6]2. Дмитрий К.К. © (03.12.02 14:17)
да, есть таког баг. Во всяком случае для IE5.XX. Для шестого не проверял ....
← →
Дмитрий К.К. (2002-12-03 14:24) [7]2Ihor Osov"yak
Мы же с Вами его тогда разбирали.
← →
Кулюкин Олег (2002-12-04 11:53) [8]2 Дмитрий К.К. © (03.12.02 14:17)
> Сделай сам такой пример, вызови процедуры печати, а потом нажми "Отмена". Хочешь угадаю ошибку? ;)
Знаю я эту ошибку.
Поэтому я и поставил печать в try...except :)))
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.12.12;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.007 c
