Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Delphi: ActiveX/СОМ/CORBA > OleContainer msWord Отсутствует Меню


Автор: rith2 12.5.2009, 16:35
Привет.

Имеем:

ActiveForm -> Panel -> OleContainer.

В контейнер загружаю ms word: 

Код

OleContainer.CreateObjectFromFile(Value, False);
OleContainer.DoVerb(ovShow);


Регистрирую ActiveX Server. Вызываю метод - в контейнере открывается ms word, НО - отсутствует основное меню (там где "Файл, Правка, Вид" и т.д.), хотя остальные присутствуют ("форматирование", "стандартная" и тд)

Рыскал по гуглу - народ такие варианты использовал: 1. Ставить AutoSize у Panel в True (не помогает) 2. Ставить AutoSize у ActiveForm (не помогает) 3. Вместо 
Код
 OleContainer.DoVerb(ovShow); 
 использовать 
Код
 
OleContainer.DoVerb(OleContainer.PrimaryVerb);

(не помогает)

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

Любопытно, что в одной и Делфийских демок есть подобный пример (загрузка MS Word в контейнер) -  сравнивал код, свойства объектов у демки и у своего проекта - основные моменты одинаковые! Но в демке менюшка присутствует!  smile 

Хелп ми! 

Автор: rith2 12.5.2009, 16:52
Удивительно, как только задам здесь вопрос, то почти сразу до меня доходит СУТЬ. Над кинуть на форму MainMenu и в свойства формы Menu указать MainMenu. А у Active Form нет такого свойства

Автор: rith2 12.5.2009, 19:26
Может подскажет кто как выкрутиться? Задача - создание ActiveX компонента с MS Word внутри. Без ActiveForm ведь никак не обойтись? Как то некрасиво без менюшки...

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)