delphi - Word 文書の差し込み項目をプログラムで編集する

Question

Delphi 7 を使用して差し込み文書を処理しています。この文書はすでに Delphi の外部で作成されており、差し込みフィールドで修正されています。私の目標は、それらの差し込みフィールドを Delphi 7 で編集 (変更) することです。

「field1」という名前の差し込みフィールドがあるとしましょう。差し込みフィールド名を「field2」にするために編集する必要があります。

差し込みフィールドを開いて置換（編集）するために次のことを試みましたが、テキストを置き換えるだけで、差し込みフィールドは実際には置換前と同じです。

procedure openword;
var
  WordApp: OleVariant;
begin
  WordApp := CreateOleObject('Word.Application');
  WordApp.Visible := True;
  WordApp.Documents.Open('C:\Test.doc');
end;

procedure editmergefield; //replace
Var
  WordApp : OleVariant;
begin
  WordApp := GetActiveOleObject('Word.Application');
  WordApp.Selection.Find.ClearFormatting;
  WordApp.Selection.Find.Replacement.ClearFormatting;
  WordApp.Selection.Find.Execute(
  'Field1',True,True,False,False,False,False,1,False,'Field2',2);
end;