现在delphi7中写一"根据文档模板生成文档的程序"如下:
unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, OleCtnrs,ComObj,Word2000;type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
var
  Word_Handle, Doc_Handle: OleVariant;
  BookMark_Name: string;
begin
    try
      Word_Handle := CreateOleObject('Word.Application');
    except
    end;  Word_Handle.Visible := True;  Doc_Handle := Word_Handle.Documents.Add(Template := 'E:\checksystem\1.dot', NewTemplate := False);  try
    BookMark_Name := 'gcmc';
    Doc_Handle.Application.Selection.goto(What := wdGoToBook, Name := BookMark_Name);
    Doc_Handle.Application.Selection.Text := '这个是替换book1的结果';    BookMark_Name := 'hyjl';
    Doc_Handle.Application.Selection.goto(What := wdGoToBook, Name := BookMark_Name);
    Doc_Handle.Application.Selection.Text := '这个是替换book2的结果';
  except
  end;  Doc_Handle.SaveAs(FileName := '1.doc', FileFormat := wdFormatDocument, AddToRecentFiles := False);
end;end.请教的问题:
1、如何实现对被替换的部分实现格式控制,如将上面的'这个是替换book2的结果'实现加粗,字号为”四号”格式之后再替换进去??
2、每做上述操作时都要启动WORD,比较繁,如何实现不启动WORD,而直接生成后的文档直接放到指定的位置??