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;