Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.01.13;
Скачать: [xml.tar.bz2];

Вниз

Печать из Word а без лишнего писка   Найти похожие ветки 

 
gai   (2003-12-26 23:01) [0]

Здравствуйте, уважаемые коллеги. Пишу программу
в кторой требуется печатать Word документ в
фоновом режиме. Пробовал по всякому, но каждый раз при попытке
распечатать документ, выскакивает мерзенькое сообщение
"Документ не входит в границы печати. Продолжить? [Да][Нет]".
Мне это предупреждение как "зуб в носу", во первых появляется на экране
редактор Word, во вторых, если я захочу напечатать 100 документов
подряд, мне это окно будет совсем неуместно. Что делать?
Печатаю так: ShellExecute(Application.handle, "print", PChar("file.doc"), nil, nil, SW_HIDE);

С уважением.
Гришан А.


 
Shirson   (2003-12-27 13:06) [1]

попробуй так:

uses comobj;
...
var msw:variant;
begin
msw:=createoleobject("word.application");
msw.Documents.Open(FileName:="file.doc");
msw.Documents.PrintOut(Background:=true);


 
gai   (2003-12-27 15:53) [2]

пробовал, та же проблема :(



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

Форум: "Основная";
Текущий архив: 2004.01.13;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.014 c
3-37521
Ренат
2003-12-16 16:08
2004.01.13
Помогите с простым запросом


8-37800
Незнайко
2003-09-13 12:45
2004.01.13
DynamicSkinForm


7-37957
debugger
2003-10-24 17:35
2004.01.13
Запуск сервисов под правами юзера.


4-37973
X-Disa
2003-11-10 13:27
2004.01.13
Процессы


1-37700
Frogkiller
2003-12-25 22:52
2004.01.13
Ошибка при запуске потока





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский