На главную Наши проекты:
Журнал   ·   Discuz!ML   ·   Wiki   ·   DRKB   ·   Помощь проекту
ПРАВИЛА FAQ Помощь Участники Календарь Избранное RSS
msm.ru
Обратите внимание:
1. Прежде чем начать новую тему или отправить сообщение, убедитесь, что вы не нарушаете правил форума!
2. Обязательно воспользуйтесь поиском. Возможно, Ваш вопрос уже обсуждали. Полезные ссылки приведены ниже.
3. Темы с просьбой выполнить какую-либо работу за автора в этом разделе не обсуждаются.
4. Используйте теги [ code=cpp ] ...текст программы... [ /code ] для выделения текста программы подсветкой.
5. Помните, здесь телепатов нет. Старайтесь формулировать свой вопрос максимально грамотно и чётко: Как правильно задавать вопросы
6. Запрещено отвечать в темы месячной и более давности без веских на то причин.

Полезные ссылки:
user posted image FAQ Сайта (C++) user posted image FAQ Форума user posted image Наши Исходники user posted image Поиск по Разделу user posted image MSDN Library Online (Windows Driver Kit) user posted image Google

Ваше мнение о модераторах: user posted image B.V.
Модераторы: B.V.
  
> наболевший вопрос о вставке формулы в MS Word
    всталяю формулу в word таким способом:
    ExpandedWrap disabled
      ...
      SelectionPtr pSelection = pWordApp->Selection;
      TCHAR val[255] = _T("EQ \\f(2;c+1)")); // например, формула "2 / c+1"
      pSelection->Fields->Add(pSelection->Range,&_variant_t(wdFieldEmpty),&_variant_t(_bstr_t(val)),&_variant_t(false));
      pSelection->Collapse();
      ...

    пользуюсь OLB файлом от 97 ворда (msword8.olb), хотя суть проблемы не в этом. формула замечательно вставляется начиная с 97 ворда и по 2007 включительно (2010 просто не проверял).
    но есть одна "маленькая" проблемка. если вставленную мной формулу открыть на редактирование, то в вордах 97-2003 она открывается нормально, но после сбрасывания фокуса меняется шрифт (не совсем понятно почему, но это еще терпимо). а вот в 2007 ворде при попытке зайти внутрь этой самой формулы сам ворд (вернее редактор формул) выдает сообщение "Формула слишком велика для преобразования" и полностью стирает саму формулу оставляя пустой объект Equation.
    По интернету ходят слухи :), что нужно создавать отдельно объект Equation, например, так:
    ExpandedWrap disabled
      pSelection->InlineShapes->AddOLEObject(&_variant_t(_bstr_t(_T("Equation.3"))),
                                             &_variant_t(_bstr_t(_T(""))),
                                             &_variant_t(false),
                                             &_variant_t(false));

    а потом в него писать формулу, но, естественно слухи примерами не подтверждаются.

    Так вот меня интересует, как ПРАВИЛЬНО вставлять формулу в ворд, чтоб не было таких приколов, с которыми я сейчас столкнулся :( ?
      Используй второй способ.
      Где не понятного?
        да кругом не понятно.
        ExpandedWrap disabled
          pSelection->Fields->Add(pSelection->Range,&_variant_t(wdFieldEmpty),&_variant_t(_bstr_t(val)),&_variant_t(false));

        эта штука создает просто поле, в которое пишется строка, по которой сам ворд понимает, что это формула. ИМХО, так и следует делать, т.к. сам компонент Equation может быть не установлен на компьютере, но формула все равно отобразится.
        Допустим, я точно знаю, что он (компонент) установлен (это не трудно выяснить, покопавшись в системных папках :)) и хочу ПРАВИЛЬНО создать формулу
        ExpandedWrap disabled
          pSelection->InlineShapes->AddOLEObject(&_variant_t(_bstr_t(_T("Equation.3"))),
                                                 &_variant_t(_bstr_t(_T(""))),
                                                 &_variant_t(false),
                                                 &_variant_t(false));

        этот код создает ОБЪЕКТ Equation. А как добавить строку В НЕГО?
          Нужно передать строку как SendKeys.Send("Моя формула");
          Equation не имеет интерфейс для работы через код, или используй OMath.
            на сколько я знаю, SendKeys - это для VBA.
            можно примерчик на С++? Допустим у меня есть переменная, где будет храниться формула (TCHAR val[255])
            Вот как засунуть "val" внутрь создаваемого объекта Equation?
              ExpandedWrap disabled
                for(int q=0;q<l;q++)
                {      
                        keybd_event(val[q], 0, 0 ,0);
                        keybd_event(val[q], 0,  KEYEVENTF_KEYUP,0);
                }

              Если объект активно и видно, иначе никак.

              Добавлено
              Цитата gonini @
              на сколько я знаю, SendKeys - это для VBA.

              На Visual Studio.Net такого было.
              Сообщение отредактировано: coder -
                м-да, придется остаться с тем что есть сейчас, т.к. вариант с SendKeys не подходит в принципе:
                1. документ должен быть видим. (не хочу раздражать пользователя мультиком под название "формирование отчета" :))
                2. sendkeys эмулирует работу клавиатуры и мышки и не имеет никакого отношения к ключевым словам формулы (а ну ка навскидку, куда должна клацнуть мышка (причем несколько раз), чтоб на экране появился значек интеграла :):):) и это при разных разрешениях монитора и т.п.)
                3. нашел вариант когда поле EQ не преобразуется в формулу и в 2003 ворде.

                PS: попробую разобраться в чем причина (это по поводу ворда 2003), возможно это поможет "вылечить" и ворд 2007. если получится, отпишусь о результатах.
                1 пользователей читают эту тему (1 гостей и 0 скрытых пользователей)
                0 пользователей:


                Рейтинг@Mail.ru
                [ Script execution time: 0,0874 ]   [ 15 queries used ]   [ Generated: 16.11.25, 00:42 GMT ]