Try the following: // From: CEHJohnsonuses OleAuto;var MSWord : Variant; begin MsWord := CreateOleObject('Word.Basic'); MsWord.FileNewDefault; MsWord.TogglePortrait;end;