我在webbrowser打开了一个htm文件，我现在想用代码将它转在word文档，该怎么做呢？

Question

uses ComObj;
procedure TForm1.Button1Click(Sender: TObject);
var
  FileName: String;
  V: Variant;
begin
  FileName := WebBrowser1.LocationURL;  
  V := CreateOleObject('Word.Basic');
  V.AppShow;
  V.FileOpen(FileName);
end;—————————————————————————————————
MaximStr := '宠辱不惊，看庭前花开花落，去留无意；
             毁誉由人，望天上云卷云舒，聚散任风。';
I.Maxim := MaximStr;
I.Explain := '可用分不够可以给我发短消息';
I.Desire := '加不加分随你';
—————————————————————————————————