Examples Delphi

Try the following:

// From: CEHJohnson
uses
OleAuto;
var
MSWord : Variant;

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