再问个关于word的问题

喝口水 2008-11-10 05:40:02
var
p1,p2:oleVariant;
StartPos, EndPos: integer;
Wdoc: TWordDocument;
WApp: TWordApplication;
sdoc: TWordDocument;
...

p1:=StartPos;
p2:=EndPos;
//sDoc.Range(p1,p2).Copy;
//wDoc.Paragraphs.Last.Range.Paste;

wDoc.Paragraphs.Last.Range:=sDoc.Range(p1,p2);

wDoc和Sdoc为两个打开的文档,我想把sDoc里的东西复制到wDoc中,但又不想通过剪切板的方法,当然红色部分是可以的,但不是我想要的方法,能不能不通过而复制里面的内容,要复制的内容包括文字和图片等
我想用下面的方法,但是不可以
wDoc.Paragraphs.Last.Range:=sDoc.Range(p1,p2);

请问怎么实现?
...全文
129 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
喝口水 2008-11-18
  • 打赏
  • 举报
回复
算了,不再妄想什么,结贴了,没人回答我
喝口水 2008-11-17
  • 打赏
  • 举报
回复
顶上去
喝口水 2008-11-14
  • 打赏
  • 举报
回复
这个好几天了,没人回答
lake_cx 2008-11-14
  • 打赏
  • 举报
回复
估计不行,不知道楼主为什么不想用复制粘贴?
喝口水 2008-11-12
  • 打赏
  • 举报
回复
[Quote=引用 3 楼 Bear_hx 的回复:]
一个简便的办法是用wDoc也打开哪个文件,然后保存的时候保存为另外的文件。
[/Quote]看清后再说, 这个是局部复制
Bear_hx 2008-11-12
  • 打赏
  • 举报
回复
一个简便的办法是用wDoc也打开哪个文件,然后保存的时候保存为另外的文件。
喝口水 2008-11-11
  • 打赏
  • 举报
回复
我的问题经常没人光顾,自已顶一下
喝口水 2008-11-11
  • 打赏
  • 举报
回复
还没人光顾吗,自已再顶一下

16,748

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 语言基础/算法/系统设计
社区管理员
  • 语言基础/算法/系统设计社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧