关于WordApplication的问题

Question

大虾们好呀，我现在遇到一个问题，就是想打开一个Word文档，然后用程序执行选择某一段文字，然后进行剪切、选择性粘切为“Windows图片”，应该怎么样来完成呀？各位大虾有没有做过的呀？
   先谢了！

Answer 1

在Delphi中安装路径中有个很详细的Demo我的安装在C:\Program Files\C:\Program Files\Borland\Delphi7\Demos\ActiveX\OleAuto\SrvComp\Word

Answer 2

WordApplication1.Selection.Copy
Clipboard := TClipboard.Create;
            image1.Picture.Assign(Clipboard);
            Clipboard.Free;
Image1.Picture.SaveToFile(ExtractFileDir(application.ExeName)+'\bmp.bmp');
就是如果word有多页，怎么知道word的页数？也帮忙看一下