操作word文档？(100分)

在delphi 7.0中
1.如何打开word文档，用什么控件及代码？
2.如何合并word文档？
3如何按页拆分word文档？
最好，提供以下代码，感谢！！[]

以前有很多的讨论，你可以查一下的！！主要使用delphi的控件或vba，你自己查吧，
因为讨论过多，大家都不愿意回答你的，我以前就遇到过这样的情况，然后就自己
捣腾出来了！祝你很快明白这些东西！

用Servers里的相关控件，
以word为关键词搜一下不少
参考VBA和Word2000.pas
没有系统资料
要根据自己的需要，自己摸索。

在Word插入字符

现在的文档很多都是用Word软件来编辑的，但如果你想在程序中把某些字符插入到Word文档中，那么下面的程序帮你忙：

procedure TForm1.Button1Click(Sender: Tobject);
var MSWord: Variant;
begin
MSWord := CreateOLEObject('Word.Application');
//连接Word
MSWord.Documents.Open(FileName:='d:/test.doc',
ReadOnly:=True);
//打开外部Word文档
MSWord.Visible := 1;//是否显示文件编辑
MSWord.ActiveDocument.Range(Start:=0, End:=0);
//开始改变的启止位置
MSWord.ActiveDocument.Range.InsertAfter(Text:='Title');
//在Word中增加字符'Title'
MSWord.ActiveDocument.Range.InsertParagraphAfter;
MSWord.ActiveDocument.Range.Font.Name := 'Arial';
//字体名称
MSWord.ActiveDocument.Range.Font.Size := 24;
//字体大小
end;

向word文档中粘贴内容

在DELPHI程序中向WORD文档增加内容的方法有几种，一种是直接增加所要的内容，前面已经介绍过了，另一种是将已经写好的内容粘贴到word文档中，下面的方法将创建一个新文档并粘贴内容：

var
v:variant;
begin
RichEdit1.SelectAll;
RichEdit1.CopyToClipboard;
v:=CreateOleObject('Word.Application');
v.documents.add;//创建一个新文档
v.documents.item(1).Sentences.Last.paste;
//将剪贴板中的内容粘贴到文档中
v.documents.item(1).SaveAs('c:/aa.doc');
//保存文档
v.quit;
end;

多人接受答案了。