Печать в MS-Word

← →
zrv (2004-06-02 09:31) [0]

Подскажите кто знает в чем проблема. Загружаю в Word файл и правлю там нужные мне символы, затем пускаю на печать и печатается сначала пустой лист, а потом уже нормальный, в предварительном просмотре показывает только один лист. Что я неправильно сделал? И еще как правильно закрыть Word без сохранения изменений, что бы он не выдавал сообщения о необходимости сохранить файл?
Кусок кода :

var ff,s1,Tr,Fal,Replace,ReplaceWith,Wrap: OleVariant;
begin
ff:="d:\arhiv\myprogram\new.rtf";
Form1.WordApplication1.Documents.Add(ff,EmptyParam,EmptyParam,EmptyParam);
Form1.WordApplication1.Visible:=false;
Wrap := wdFindContinue;
Replace := wdReplaceOne;
Tr:=True;
Fal:=False;
s1:="@134";
ReplaceWith := DateTimeToStr(Now);
Form1.WordApplication1.Selection.Find.Execute(S1,Fal,Fal,fal,Fal,Fal,Tr,Wrap,Fal,ReplaceWith,Replace,fal,fal,fal,fal);
......
......
s1:="@150";
ReplaceWith := " ";
Form1.WordApplication1.Selection.Find.Execute(S1,Fal,Fal,fal,Fal,Fal,Tr,Wrap,Fal,ReplaceWith,Replace,fal,fal,fal,fal);
Form1.WordApplication1.PrintOut;
Form1.WordApplication1.Quit;
Form1.WordApplication1.Disconnect;

← →
YurikGL © (2004-06-02 09:42) [1]

Где-то в настройках принтера есть такая штука, как страница разделитель. Посмотри ее.

← →
zrv (2004-06-02 10:28) [2]

В настройках принтера в странице разделителе ничего нет. Может это операционка XP и office XP с Delphi 7 не найдут общий язык?

← →
YurikGL © (2004-06-02 11:03) [3]

А если из ворда сам посылаешь на печать, в смысле не из твоей программы а сам текст набираешь, он тоже пустую страницу выдает или нет?

← →
YurikGL © (2004-06-02 11:08) [4]

zrv (02.06.04 10:28) [2]

Панель управления/принтеры/твой принтер/дополнительно/страница разделитель - удали все оттедава

← →
zrv (2004-06-02 11:25) [5]

Нет если из ворда то все нормально.
А вот из программы пустую страницу печатает даже если убрать: Form1.WordApplication1.PrintOut;
и оставить только:
Form1.WordApplication1.Quit;
Form1.WordApplication1.Disconnect;
т.е даже просто закрытие ворда выдает на печать пустую страницу.

Могу лишь посоветовать комментировать строчки между Connect и disconnect и искать, какая из них ведет к такому эффекту.
Искать можно так: Сначала комментируешь первую половину кода и смотришь, потом вторую и т.д.

Печать в MS-Word Найти похожие ветки