Пробовал так
Код:
var
Word: olevariant;
begin
Word:=CreateOleObject('Word.Application'); { открываем Word }
Word.Visible:=true;{ делаем его видимым }
Word.Documents.Add;{ создаем новый документ }
Word.WordBasic.EquationEdit;{ вставляем уравнение }
Word.Selection.OMaths(1).Functions.Add(word.Selection.Range, 7)._Frac.Type:= 0;{ добавляем дробь }
В результате сообщение об ошибке: OMaths не является методом