CurStyle := PWordApp.Selection.Get_Style;
NameStyle := CurStyle.NameLocal;
if (NameStyle = 'Heading 1') or (NameStyle = 'Заголовок 1') then
...
Если Вы уже зарегистрированы на Портале - войдите в систему, если Вы еще не регистрировались - пройдите простую процедуру регистрации.