OLE-Automation

← →
SRom (2003-08-19 18:52) [0]

Как из делфей поключиться к существующему серверу автоматизации?

← →
clickmaker © (2003-08-19 19:00) [1]

CreateOleObject,
TOleContainer

← →
Serginio666 (2003-08-19 19:19) [2]

try // Если Word уже запущен MsWord := GetActiveOleObject("Word.Application"); // Взять ссылку на запущенный OLE объект except try // Word не запущен, запустить MsWord := CreateOleObject("Word.Application"); // Создать ссылку на зарегистрированный OLE объект MsWord.Visible := True; except ShowMessage("Не могу запустить Microsoft Word"); Exit; end; end; end;

← →
SRom (2003-08-19 19:58) [3]

спасибо. Это понятно.
Прошу прощения за дурацкие вопросы,
я на Delphi никогда не программировал, поэтому если можно,
напишите кусочек программного кода, в котором выполняется подключение к серверу и вызывается один из его методов.
Для определенности будем считать, что сервер зарегистрирован в системе подименем "MySvr" и в нем реализован метод Hello() без параметров. Заранее благодарен.

← →
Dred2k © (2003-08-19 20:42) [4]

var OLEVariant;

OLEVariant := CreateOLEObject("MySvr");
try
OLEVariant.Hello;
finally
OLEVariant := UnAssigned;
end;

← →
SRom (2003-08-19 21:56) [5]

Не получается вызвать CoInitialize() - компилятор говорит "неизвестный идентификатор". в разделе uses я указал ComObj, может еще чего-то не хватает?

← →
Dred2k © (2003-08-19 22:11) [6]

uses ActiveX;

Тебе вообще зачем это?
В разных нитках работаешь?
Если нет - он сам вызовется.

И еще. Поиск по ключевому слову во всех подкаталогах на маску *.pas;*.inc - полезная весчь ;)

← →
SRom (2003-08-19 22:22) [8]

Спасибо, дружище, получилось!
Я вообще-то всю дорогу работаю на Visual C++ (когда-то давно работал с Pascal), но случилось вот столкнуться с Oracle и оказалось,что на Delphi с ним работать очень удобно, а все, что
реализовано на C++ вызывать через OLE.
Но я сегодня Delphi первый раз в глаза увидел, кое-как создал
проект, но наверное чего-то не доделал, раз CoInitialize() не
вызвался автоматом...
Спасибо.

> SRom (19.08.03 22:22) [8]
> Спасибо, дружище, получилось!

Да не за что. ;)
В RXLib есть зело полезный класс TOleController (uses Ole2Auto). Очень советую. Может, подобная реализация есть и в D7 - сам я сижу на 4-ке.

OLE-Automation Найти похожие ветки