高手请进!关于word打印!(50分)

A

arron1104

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-09

• #1

[blue]我用wordapplication,打开word并且添加数据进书签.请问有谁能做到进入word时只进入预览打印界面,用户关闭预览界面后回到我的应用程序(这样做的目的是防止用户修改数据).如果要用到
vba,请详细给出代码和如何再delphi中使用vba.谢谢![/blue]

 

A

arron1104

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-10

• #2

各位高手,快帮帮小弟一把吧,如果回答的详细,嫌分少,可以再加.

 

A

arron1104

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-10

• #3

可能是我说的太简略了
WordApplication1.Connect;
WordApplication1.Documents.Add(template, newtemplate,do
cumenttype, visible);
tmpbookmark := 'modality';
try
wordapplication1.ActiveDocument.Bookmarks.Item(tmpbookmark).Range.InsertAfter('CT');
//建立一个word模板,其中建立一个'modality'书签,往书签里插入数据
except
end;
wordapplication1.Visible := true;
wordapplication1.ActiveDocument.PrintPreview;//打印预览
但是如果用户关闭预览窗口,就回到了word编辑窗口,这样用户就可以编辑数据了,但这是我不希望的,我的程序应该限制用户修改数据.请问大侠们怎么做???我想在用户关闭打印预览窗口时,就回到我的应用程序.或者回到word编辑窗口,但是不能修改数据(不能打印出来的数据和我传递过去的数据不一致).

 

仙

仙剑奇侠

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-10

• #4

我写出我的思路吧，你试一试可不可以
首先用WordDocument1连接WordApplation打开的文档
打开文档并处理完你的工作时执行
WordDocument1.PrintPreview;
但是，关闭预览时，没有事件，你可以试一下能不能通过其他方法实现
不好意思，我也不会这个

 

仙

仙剑奇侠

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-10

• #5

对不起，你已经写了，没看到

 

仙

仙剑奇侠

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-10

• #6

WordApplication1.ActiveDocument.ReadOnly :=True;
试了吗

 

A

arron1104

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-10

• #7

仙剑奇侠:
我试了,提示:cannot assign to a read-only property

 

A

arron1104

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-10

• #8

郁闷中.....

 

W

windbell

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-10

• #9

在打印预览时也可以编辑文档!所以你的方法行不通的!只能通过VBA建立一个保护文档，使用密码防止文档修改
wordapplication1.ActiveDocument.Protect(Password:="aaa", NoReset:=False, Type:=dAllowOnlyFormFields);
这样就可以防止文档被修改了!要取消保护时必须输入密码才可以。

 

仙

仙剑奇侠

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-10

• #10

那我再找一下有没有其他办法

 

A

arron1104

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-10

• #11

再问一个问题:我如何才能屏蔽掉一些基本操作,例如新建,另存等???
我可以把file菜单屏蔽掉,但用户如果把工具栏的常用工具栏选上,即使没有菜单项,但是用户仍能在toolbar中使用新建,另存为等功能.

 

仙

仙剑奇侠

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-10

• #12

提前一下，怎么没有别人来回答啊，我也想知道这些问题，如果谁回答了，我另送100分

 

A

arron1104

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-10

• #13

没想到仙剑奇侠兄对这问题也很感兴趣
我还想问一下,每次调用word打印结束后,关闭word,总要提示''是否保存对文档一的修改?'',用什么办法能屏蔽掉这个提示?
另:windbell说的方法可行,我试了,就是Type:=dAllowOnlyFormFields应该为Type:=WdAllowOnlyFormFields,想必是老兄的笔误了.在此谢谢windbell兄了,还有仙剑奇侠兄.

 

仙

仙剑奇侠

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-10

• #14

WordApplication1.ActiveDocument.Saved :=True;

 

A

arron1104

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-10

• #15

WordApplication1.ActiveDocument.Saved :=True;
好像不行啊

 

仙

仙剑奇侠

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-11

• #16

在关闭Word时执行，不可以吗，我用OleContainer就是这么做的

 

A

arron1104

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-11

• #17

怎么没人回答啊?是不是嫌分少了啊?

 

仙

仙剑奇侠

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-12

• #18

我也不知道这些人是不是有病啊，还是没人能回答这个问题了，帮你在提前一下

 

W

windbell

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-12

• #19

仙剑奇侠:
你这个同志，说话这么不文明!各人和各人和事，不可能总是将时间耗在网上吧!在说了，大家不知道或者太麻烦不想回答也不是错!这个地方就是自愿。
另外这种问题，只是一个技巧问题，只要肯专研，都是可以解决的，不一定都要去问吗!
还有象楼主同志主这样，问一个问题，再接着一个，好象不是太好吧？

 

仙

仙剑奇侠

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-15

• #20

对不起，我错了，我只是想引起大家的注意，来认真看一下这个问题，没有其他的意思
向大家道歉了