[WinWord] Ribbon ausschalten

[neo4a]

Ich erzeuge aus einer DelphiApp heraus 1 oder mehrere Word-Dokumente. Gibt es einen zuverlässigen Weg, damit bei den neu erzeugten Word-Instanzen die Ribbon-Bar minimiert ist?

Delphi-Quellcode:

  aWordApp := TWordApplication.Create(Self);
  try
    aWordApp.Connect;
    aWordApp.Visible := False;
    aEmptyParam      := EmptyParam;
    aDocType         := wdNewBlankDocument;
    aDocVisible      := True;
    aFalseParam      := False;
    aWordApp.Documents.Add(aEmptyParam, aEmptyParam, aDocType, aDocVisible);
    aWordApp.Selection.InsertFile(aFileName, aEmptyParam, aFalseParam, aFalseParam, aFalseParam);

    aWordApp.CommandBars['Ribbon'].Set_Visible(False);

    aWordApp.Visible := True;
    aWordApp.Activate;

  finally
    aWordApp.Free;
  end;