protected:
IDispatch* _iDisp;
};
Ниже приводится небольшая иллюстрация динамической диспетчеризации. Конечно, тот же самый результат мог быть получен непосредственно, если вызвать метод get_Name интерфейса IGenericDocument. Мы рассмотрим этот непосредственный метод, использующий таблицу виртуальных фунций через мгновение, чтобы получить полный путь документа.
// Use docObj as a dispatch interface
DISPID pid = docObj.GetDispId(L"Name");
VARIANT varResult;
::VariantInit(&varResult);
docObj.GetProperty(pid, varResult);
BString bName(varResult);
CString cName(bName);
canvas.Text(20, y, "Name:");
canvas.Text(200, y, cName);
Это показывает, как Вы получаете путь, используя таблицу виртуальных функций (vtable).
SObjFace<IGenericDocument, &IID_IGenericDocument> doc(docObj);
BString bPath;
doc->get_FullName(bPath.GetPointer());
Теперь у Вас не должно быть каких-либо проблем при понимании кода, который определяет номер строки, на которой пользователь позиционировал курсор.
BString bType;
doc->get_Type(bType.GetPointer());
if (type.IsEqual("Text")) {
SObjFace<ITextDocument, &IID_ITextDocument> text (docObj);
SSelection selObj(text);
SObjFace<ITextSelection, &IID_ITextSelection> sel(selObj);
long line;
sel->get_CurrentLine(&line);
canvas.Text(20, y, "CurrentLine:");
char buf[10];
wsprintf(buf, "%ld", line);
canvas.Text(200, y, buf);
}
SSelection — это DispObject, который может быть получен, вызовом метода get_Selection интерфейса текстового документа.
class SSelection: public DispObject {
public:
SSelection(SObjFace<ITextDocument, &IID_ITextDocument>& doc) {
HRESULT hr = doc->get_Selection(& _iDisp);
if (FAILED(hr)) throw HEx(hr, "get_Selection failed");
}
};
У Вас могут быть небольшие трудности, если это — ваш первый контакт с OLE (преуменьшение!). Поэтому, ниже подводятся некоторые итоги, которые суммируют различные действия, позволяющие упростить задачу Автоматизации. Обратите внимание, что это — клиентская сторона уравнения. Если Вы хотите, чтобы ваше приложение было сервером Автоматизации, то ожидайте некоторых усложнений. Хорошо то, что имеется большое количество литературы по этим вопросам.
Итак здесь изложено то, что Вы должны сделать.
• Исследование
○ Проведите поиск в вашем реестре (используя RegEdt32 или OLE/COM object viewer) чтобы найти ProgID приложения, которым Вы хотите овладеть. HKEY_CLASSES_ROOT — отправная точка. Вы увидите там такие ключи как Word.Application, Excel.Application и многие другие.
○ Отыщите библиотеки типов, используя OLE/COM object viewer. Они предоставят идентификаторы классов и идентификаторы интерфейсов, которые Вы должны скопировать и вставить в ваш код.
○ Найдите заголовочные файлы для этих интерфейсов.
• В вашей программе: Преобразуйте ProgID в ClassID.
• Чтобы соединяться с выполняющимся приложением или активизировать новый экземпляр, создайте SObject, используя ClassID.
• Получите интерфейс IApplication из объекта (используйте шаблон IObjFace).
○ Используйте этот интерфейс, чтобы получить доступ к другим объектам внутри приложения. Для каждого такого объекта:
○ Объявите класс, наследующий от DispObject.
○ В его конструкторе используйте соответствующий get_* метод, чтобы получить доступ к внутреннему объекту.
○ Создайте объект этого класса, передавая его интерфейс родительскому объекту.
○ Получите соответствующий интерфейс из этого объекта используя шаблон IObjFace.
○ Вызовите соответствующие методы этого интерфейса.
Итак, во что бы это вылилось при подсчете ссылок OLE? Победите меня! Они должны были исчезнуть, если только использовать правильную инкапсуляцию. Ниже приведена диаграмма зависимостей классов. OLE объекты — слева, OLE интерфейсы — справа.
Во временя выполнения, Вы начинаете с SObject, представляющего программу, которую вы связываете. Затем обеспечиваете доступ из объекта к интерфейсу и от интерфейса к DispObject. Вы используете объекты как источники интерфейсов и интерфейсы для вызова специфических методов и получения других объектов.
В заключение. Вы можете загрузить исходный текст примера, который иллюстрирует применение этих методов.
Далее: Создание разделителя окон (сплиттера).
Как разделить окно на части
Перевод А. И. Легалова
Англоязычный оригинал находится на сервере компании Reliable Software
Разделительная полоска — полезный элемент, который не входит в состав элементову правления Windows. Насколько трудной его реализовать? Не столь трудно, как это кажется, если Вы знаете хотя бы основы Windows API. Представленное описание может в начале показаться сложным, но вы изучите несколько очень важных методов, которые могут многократно использоваться в различных местах. Работа с дочерними окнами, сбор данных от мыши, рисование с использованием xor (исключающего или) режима — вот только некоторые из них.
Сплиттер — это окно. Точнее — это дочернее окно. Оно позиционировано между двумя другими дочерними окнами — мы назовем их левым и правым подокном, соответственно (или верхним и нижним для горизонтального расщепителя). Должно также быть основное окно, явялющееся родителем для трех дочерних.
Без дальнейшей суеты приведем код WinMain, который осуществляет начальные установки.
// Create top window class
TopWinClassMaker topWinClass(WndProcMain, ID_MAIN, hInst, ID_MAIN);
topWinClass.Register();
// Create child pane classes
WinClassMaker paneClass(WndProcPane, IDC_PANE, hInst);
paneClass.SetSysCursor(IDC_IBEAM);
paneClass.SetDblClicks();
paneClass.Register();
Splitter::RegisterClass(hInst);
// Create top window
ResString caption(hInst, ID_CAPTION);
TopWinMaker topWin(caption, ID_MAIN, hInst);
topWin.Create();
topWin.Show(cmdShow);
В начале мы регистрируем классы. Верхний оконный класс связан с его оконной процедурой WndProcMain, которую мы рассмотрим через мгновение. Два дочерних подокна совместно используют тот же самый класс окна, связанный с WndProcPane. Затем регистрируется наш собственный класс сплиттера (мы скоро увидем его код). В заключение, создается и отображается верхнее окно. Дочерние окна создаются динамически во время инициализации родительского окна.