TOleContainer + MS Word

← →
Pavelkq (2008-04-08 15:50) [0]

Имеется 2 формы. Одна из них основная, вторая размещатеся в панели на первой. Во второй форме находится TOleContainer с (Align:=alClient) документ Ворда так, чтобы он всегда был в режиме редактирования. На собыние создания второй формы пишу:
OleContainer1.CreateObjectFromFile(my_path+"\WorkDir\text.rtf",false);
В основной форме OnShow такое:
form2.Parent := Panel2; Form2.Show; Form2.OleContainer1.DoVerb(ovInPlaceActivate);

На всякий случай попробовал в ОнАктивыйт для второй формы сделать
OleContainer1.DoVerb(ovInPlaceActivate);
Программа запускается и все вроде бы хорошо, но:
1. В меню ворда не доступны функции Новый, Открыть, Сохранить и Не распространять. Из всего этого добра мне нужна только функцию Сохранить.
2. Однако, имеется меню Файл. В нем есть функцию сохранения. Работает превосходно. Но после первого же сохранения (или отказа от него) все панели управления Вордом блокируются и больше их ничем не оживить.

Собственно вопросы:
1. Какие возможны значения для процедуры DoVerb (с описанием)?
2. Можно ли активировать функцию сохранения на стандатрной панели управления?
3. Как заставить не блокироваться панели управления Вордом?

P.S. Вторую форму создал потому, что TOleContainer с Вордом при активации занимает всю форму (это слишком!).

← →
tesseract © (2008-04-08 16:17) [1]

> Какие возможны значения для процедуры DoVerb (с описанием)?

В справке.

Если не ошибаюсь у ole-объекта Word есть функция сохранения. Зачем тебе панели Word тогда ?

← →
Pavelkq (2008-04-09 06:33) [2]

Уверен, что пользователь предпочтет пользоваться функцией самого Ворда, а не какими-то невидимыми функциями.

Справка говорит вот что:

Requests that the OLE object perform some action.
procedure DoVerb(Verb: Integer);
Description
Call DoVerb to request that the OLE object perform one of the actions listed by the ObjectVerbs property. OLE defines several verbs, such as ovShow (to display the OLE object) and ovPrimary (the default action, usually to activate the OLE object). OLE objects can also define their own custom verbs. Use the ObjectVerbs property to get a list of those custom verbs

Итого, описано лишь 2 значения.

Если плюнуть на это сохнанение, то открытым остается третий вопрос, о неблокировке панелей управления.

← →
Pavelkq (2008-04-09 06:56) [3]

Попробовал поэксперементировать со значением для процедуры DoVerb и свойством AutoActivate, вот это глюки! Курсор пропадает, меню исчезает, при повторной активации курсор становится полупрозрачным, подвисает на несколько секунд, то не дает ввести никакой текст.
Кто-нибудь хоть раз добивался стабильной работы этой штуки?

> Кто-нибудь хоть раз добивался стабильной работы этой штуки?

Outlook например. Просто несколько не понимаю зачем Word документ открывать в своей программе со всем его интерфейсом.

← →
Pavelkq (2008-04-09 12:47) [5]

Нужно хорошее окно для работы с форматированным текстом (RTF или DOC). Я конечно сначала поставил на фору РичЭдит, но к нему столько всего надо приделывать!!! Особенно нудно делать подсветку текста. А у Ворда уже все готово. Прекрасный текстовый процессор. Но в ТОлеКонтейнере глючит жутко.

TOleContainer + MS Word Найти похожие ветки