Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

OLE Word. Как вставить формулу со знаком корня? [D6, WinXP]


ArtemKolesnikov ©   (2010-11-03 12:43:00) 

Здравствуйте уважаемые специалисты!
Помогите решить проблему.

procedure TForm2.Button2Click(Sender: TObject);
var
 W, t : Variant;
begin
 W := CreateOleObject('Word.Application');
 W.Documents.Add;
 W.Visible := True;
 t:=w.ActiveDocument.characters.count;
 w.selection.move(1, t);
 w.selection.typeparagraph;
 w.ActiveDocument.range.insertafter('sqr');
 w.Selection.MoveRight( Count:=7, Extend:=true);

 w.Selection.OMaths.Add(w.Selection.Range);
 w.Selection.Range.OMaths.BuildUp;
 w.Selection.OMaths.item(1).ParentOMath.Justification:= 3;
end;


Код работает, но отображается не корень а слово "sqr".
При этом если поменять сейчас sqr на например 2*2/4 то отобразится нормальная формула.
Пожалуйста, помогите разобраться.
СПАСИБО!


Palladin   (2010-11-03 17:00:00) [1]

sqr это три буквы, а не корень


Dimka Maslov   (2010-11-03 15:03:00) [2]

квадратный корень есть возведение в степень 1/2


Наверх

Титульная страница Поиск, карта сайта Написать письмо