delphi怎么将2个word模板合成一个新的word

Question

如题，请说明用什么函数，参数怎么设置。

Answer 1

不清楚，看看office有没有提供接口，仅仅靠API是不可能实现的

Answer 2

我打算用insertfile（）向文档中追加其他的内容，但不清楚这个函数中的书签参数range该怎样用

Answer 3

去查office的接口,或研究word格式,自己合并,在不行可以借助组件完成,wordapplication或ole

Answer 4

去查office的接口,或研究word格式,自己合并,在不行可以借助组件完成,wordapplication或ole

Answer 5

如果我的word表格中有很多要填的项，如果不用书签，还有什么办法控制内容的插入

Answer 6

在Delphi中调用Word软件／文件的方法 
在Word中调用Word软件，归纳起来有三种方法： 
a.使用Delphi提供的Servers控件调用Word，使用Word的属性 
b.通过真正的Com技术，将Office软件目录中文件MSWORD9.OLB中的类库全部导入Delphi中， 
利用Com技术编程 
c.使用CreateOleObject将启动Word，然后以Ole方式对Word进行控制。 我使用第三种，网上资料很多的

Answer 7

procedure TForm1.FormShow(Sender: TObject);
var
  vWordApp:OLEVariant;
  strDocName:string;
  strInsertDoc:string;
begin
  try
    vWordApp:=CreateOleObject('Word.Application');
  except
    ShowMessage('启动Word出错！');
    vWordApp:=Unassigned;
    abort;
  end;  vWordApp.Visible:=true;  // 打开文档
  strDocName:= ExtractFileDir(Application.Exename) +'\\test1.doc';
  vWordApp.Documents.Open(strDocName);  // 插入文件
  strInsertDoc:=ExtractFileDir(Application.Exename)+'\\test2.doc';
  vWordApp.Selection.InsertFile(
    strInsertDoc,   //   FileName
    '',   //   Range
    false,   //   ConfirmConversions
    false,   //   Link
    false   //   Attachment
  );end;// 当年抄老妖的