新人请教各位高手,关于WORD文档高度与宽度的问题

Tianya0513

我在进行VBA编程时,打开WORD文档后,用PageSetup 到文档的高度与宽度,是通过页数*页高得到总高度吗?宽度呢?如何计算,WORD文档中的白色部分为页面,那四周的灰色区域呢?如何得到左边\右边\上边\下边?

WORD的滚动条是什么样的映射方式?我要怎么做才可以让自己的程序的滚动条与WORD滚动条同步起来,即在我滚动程序的滚动条时,能够同步的滚动WORD滚动条?

判断一个点是否在文档内是通过 ActiveWindow.RangeFromPoint 吗?根据返回的Range 如何判断?

谢谢大家了!

MSN;tianya0513@hotmail.com

MAIL:tianya0513@163.com

[此贴子已经被作者于2005-3-23 17:15:25编辑过]

守柔

以下是引用Tianya0513在2005-3-23 17:13:00的发言：

看一下置顶的贴子《守柔WORD编程代码集》，下载后，看一下WORD中的AUTOCAD功能，里面就有类似的代码，并相信你会有更大收获的。

问题二，可以使用SELECTION.TYPE进行判断,也有

[此贴子已经被作者于2005-3-23 17:32:59编辑过]

Tianya0513

守柔版主:

你好, 能告诉我WORD文档中的各个对象吗?比如中间的白色部分是哪个对象,白色周围的是属于哪个对象?如果得到具体的WORD文档高度宽度,白色部分加上灰色部分的!

我说的判断点是否在文档内的意思是取屏幕上的一点,然后转换为WORD的坐标,然后判断这个点是否在文档内,就是白纸上. 能否指点一下!

急!

谢谢!

[此贴子已经被作者于2005-3-24 13:42:57编辑过]

守柔

麻烦大哥，画个图出来，你要什么好你画上去，好吗？我这样理解你非术语性的文字，也累！

最好用附件，详细说明一下，因为你的要求，有些杂。

Tianya0513

画上去了.我要怎样设置才可以让我自己的滚动条与WORD的滚动条一致呢,即滚动我自己写的滚动条同时可以滚动WORD文档.同步的.

[此贴子已经被作者于2005-3-24 13:45:40编辑过]

守柔

这样吧，你能将你的设计思路或者达到的目的与要求，写一下，或许可以用别的办法，没有必要这么麻烦的？

Tianya0513

我想建一个窗体,窗体上也有一个白色部分,所有的设置都和WORD上的文档一样,包括边距\滚动条\,操作我的窗体就像操作WORD一样.

可以的吧?

守柔

以下是引用Tianya0513在2005-3-25 22:28:00的发言：

我想建一个窗体,窗体上也有一个白色部分,所有的设置都和WORD上的文档一样,包括边距\滚动条\,操作我的窗体就像操作WORD一样.

可以的吧?

对不起,我也想知道.(我只会用WORD,造WORD功力还是不到啊!)

有时间,我会好好想这个问题的.SORRY!

flyswift

我想我可以解答楼主的部分问题,请看以下代码:

HWND hwnd, child_hwnd1, child_hwnd2, child_hwnd3, child_hwnd4; hwnd = ::FindWindow(_T("OpusApp"), NULL); child_hwnd1 = ::FindWindowEx(hwnd, NULL, _T("_WwF"), NULL); child_hwnd2 = ::FindWindowEx(child_hwnd1, NULL, _T("_WwB"),NULL); child_hwnd3 = ::FindWindowEx(child_hwnd2, NULL, _T("ScrollBar"), NULL);

child_hwnd3就是WORD右边滚动条的句柄......取得了它,相信你也知道如何让自己的滚动条同word的同步了吧.

另:楼主如果在看帖,请回复告诉我如何取得灰色部分上下左右边距的方法..以及中间白色的部分到底是什么对象...因为我也遇到了类似的问题....

或者Email我:flyswift@163.com 谢先