WordBasic через OLE

Попробуйте следующее:

MsWord := CreateOleObject('Word.Basic');
MsWord.FileNewDefault;
MsWord.TogglePortrait;