Как изменить размер выделеного текста в twebbrowser правильно

[pervii]

В общем суть проблемы:
есть компонент twebbrowser. Необходимо реализовать изменение размера шрифта выделенного текста.
Пробовал через конструкцию:

Range := (editor.selection.createRange as IHTMLTxtRange);
range.parentElement.style.setAttribute('font','10',1)

но она не подходит, т.к. происходит изменение всего текста родительского элемента.
Пробовал реализовать это, с помощью конструкции:

range.pasteHTML('<span style="font-size:'+'10'+';">'+range.htmlText+'</span>')

сначала работает, но если выделять текст с разными размерами шрифтов, то размер не меняется, либо меняется неправильно.
Стандартная конструкция

Range.execCommand('Fontsize', false,'5' )

тоже не подходит, ввиду что максимум 7.

итак, как изменить размер шрифта выделенного текста?? Я что может быть делаю не правильно?