又一个OLE问题，如何使插入WORD文档中图片为覆盖方式 (30分)

J

Jamw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-17

• #1

编程实现了向WORD文档中插入一幅图片。但该图片将该位置上的文字挤开了。
我如何编程可以使该图片的格式中的环绕方式设置为“无”。
即：将该图片覆盖在文字上或者下面显示。位置重叠。
哪位高手能指教一二。有什么想法的也说说吧。

 

D

djflying

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-21

• #2

设置图片的文字环绕属性嘛，具体的方法我也忘了）
你录个宏看看不就知道了？

 

B

bbs_delphi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-21

• #3

同意楼上的

 

J

Jamw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-24

• #4

可要在程序中使用啊。
难道我在程序中如此实现 先在WORD中创建宏，然后再调用宏？
WORD97。PAS中应该提供了方法的。哪位高手能指点一二？

 

D

djflying

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-24

• #5

把word中录下的宏转换成delphi中的代码。
word97.pas我没用过，建议你使用word2000的控件组
例如设置一个图片的环绕格式应该是
activedocument.shapes.item(I).wrapformat.type:=wdWrapSquare// 四周型环绕
// 反正就是找到你要的图片对象，再设置wrapformat的系列属性

 

J

Jamw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-24

• #6

to djflying:
谢谢，我在WORD97中找到了WORDDOC。SHAPES。ITEMS（i）。WRAPFORMAT。TYPE_
但我用时它为什么提示我如下错误呢？
Types of actual and formal var parameters must be identical
光标显示在ITEM（I）后。

 

J

Jamw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-25

• #7

接受答案了.