Подскажите как изменить шрифт Word'овского TextBox'а (Надпись) из VC++6.0.
Через Selection.SetFont(IDispatch*) не получается. Меняются только Bold и Italic, а имя шрифта не меняется.

Заранее спасибо!!!


Shapes oShps;//объекты Shapes Word'а
Shape oShp;,//выбранный Shape
oShps = oDoc.GetShapes(); //получаем коллекцию Shapes
Selection oSel;//выбранный элемент как выбранный блок

//ЕСЛИ НУЖНА ЦЕНТРАЛЬНАЯ НАДПИСЬ
oShp = oShps.Item(COleVariant(byte(10))); //получаем объект из коллекции
oShp.Select(COleVariant(byte(10))); //выбираем полученный объект
if (si.nCTxt)
{
oSel=appWord.GetSelection();
oSel.TypeText(si.CenTxt);//вставляем текст в TextBox Word'а
}

Спасибо за подсказку!
Только через класс CFont так не получается. Но это натолкнуло меня на правильное решение.

Нужно из библиотеки Word'а подключить класс _Font , и уже его пользовать через Selection.SetFont(<наше_имя_объекта_класса _Font>)



Shapes oShps;
Shape oShp;
oShps = oDoc.GetShapes(); //получаем коллекцию Shapes
Selection oSel;
oSel=appWord.GetSelection();
_Font ft(oSel.GetFont());
ft.SetName(si.CenType);
ft.SetSize(si.CenTypeSize);
oSel.SetFont(ft);
if (si.CenTypeBold) oSel.BoldRun();
if (si.CenTypeItalic) oSel.ItalicRun();