Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 09.05.2014, 12:12
rapashocker rapashocker вне форума
Прохожий
 
Регистрация: 10.04.2014
Сообщения: 20
Версия Delphi: Delphi 7
Репутация: 10
По умолчанию Ole Conteiner

Код:
 OleContainer1.CreateObjectFromFile('D:\Записка на диплом.docx', False);
  OleContainer1.DoVerb(ovShow);
      ev := 2;

  for i:=1 to OleContainer1.OleObject.CommandBars.Count do
      if OleContainer1.OleObject.CommandBars.Item[i].Visible then
        OleContainer1.OleObject.CommandBars.Item[i].Visible:=1;

          OleContainer1.OleObject.Protect(ev);
    OleContainer1.OleObject.ActiveWindow.ActivePane.DisplayRulers := false;
    OleContainer1.OleObject.Application.CommandBars['Standard'].visible:=false;
Вообщем я гружу фаил вордовский в OLE контейнер и вот в чем проблема, здесь используется код для того, чтобы убрать понель инструментов ворда, но он работает только для 2007 у меня 2013 помогите плиз убрать полосу инструментов заранее благодраю!!!!
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 00:14.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter