怎样按照一定的窗口大小剪切.doc文件（较难）(100分)

D

ddntyz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-02-04

• #1

请问：设置OleContainer的大小（象素点为单位），剪切.doc文件，使之匹配。

 

Y

yanlei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-02-04

• #2

不懂你的意思

 

D

ddntyz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-02-05

• #3

我的意思其实很简单的，就是“怎样设置word文档的页边距”。这应该不是一个很难的问题。但是，
需要按照已知的象素点的值来设置。这就需要一个换算关系。希望有这方面经验的同行能加入进来探讨一下。
谢谢！！

 

H

HostingLian

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-02-06

• #4

WordDoc.Range.PageSetup.Set_TopMargin(Top);
WordDoc.Range.PageSetup.Set_BottomMargin(Bottom);
WordDoc.Range.PageSetup.Set_LeftMargin(Left);
WordDoc.Range.PageSetup.Set_RightMargin(Right);
我的做法是：
首先确定上边距和右边距，然后根据象素点的值确定下边距和左边距，中间
的象素变换算法不用我说了吧

 

D

ddntyz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-02-06

• #5

很遗憾，我就是对这方面的问题不太熟悉，能否讲一下“象素换算”的问题吗？
Set_TopMargin（）里的值是什么单位的，厘米吗？
这两天我都困在了这里。希望你能详细讲讲！谢谢！！

 

H

HostingLian

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-02-07

• #6

WordDoc.Range.PageSetup.Set_TopMargin(Top);
WordDoc.Range.PageSetup.Set_BottomMargin(Bottom);
WordDoc.Range.PageSetup.Set_LeftMargin(Left);
WordDoc.Range.PageSetup.Set_RightMargin(Right);
的参数的单位是磅（英制），A4纸的大小为595.35 X 841.95
对于图形页面来说,一般你将上边距设为60左右,右边距设为40就可以了
添加图形页面,我用的是粘贴,Word可以自动调节缩放比例
还有什么问题

 

D

ddntyz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-02-07

• #7

很感谢你的回复。
1、我在WORD的宏里怎么没有找到Set_TopMargin，这个函数呢？
2、我设置页面是因为我要剪切WORD页面，而不是往里边加东西。
3、现在，我用一种办法已经可以剪切了，但是页边距的设置似乎没有完全成功。
你有兴趣与我继续探讨吗？

 

H

HostingLian

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-02-07

• #8

我使用的是Delphi的Server组件WordDocument，我对Word的宏也不太了解，
但上述方法肯定是可以用的。

 

D

ddntyz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-02-21

• #9

继续这个话题。
有谁知道Ｗｏｒｄ的宏里面CentimetersToPoints（）这个函数怎么用的。