Вниз
Скачать: CL | DM;

Как зарегистрить ActiveX компонет в runtime?   Найти похожие ветки 

← →
anton_private ©   (2002-06-07 15:57) [0]

Как зарегистрить ActiveX компонет в runtime?


← →
Дмитрий Баранов ©   (2002-06-07 16:39) [1]

1) WinExec("regsvr32.exe mycomp.ocx", 0)
2) Вызвать DllRegisterServer


← →
allrussia ©   (2002-06-08 04:27) [2]

uses Olectl (в папке Lib\Delphi2 лежит)
var
ocx: THandle;
reg: TDllRegisterServer;
begin
ocx:= LoadLibrary("activex.ocx");
reg:= GetProcAddress(ocx,"DllRegisterServer");
if reg = 0 then FreeLibrary(ocx);
end;


← →
Сергей2002   (2002-07-01 08:46) [3]

Подскажите кто знает, как загрузить OCX и использовать его функции. В крайнем случае прилинковать к EXE-файлу. Вариации на тему "REGSVR32" не нужны.
OCX следующий: AMOVIE.OCX; функции для использования что-то вроде FileName, Volume и т.д. и т.п.
За ранее спасибо!


← →
kig ©   (2002-07-01 12:46) [4]

В минимальном случае In-Proc сервер содержит всего четыре экспортируемые ф-ции:

DllRegisterServer
DllUnregisterServer
DllCanUnloadNow
DllGetClassObject

В Вашем случае Вас интересует последняя, так функции интерфейсов не экспортируются. Через нее Вы получаете интерфейс фабрики IClassFactory. Через IClassFactory.CreateInstance Вы получаете один из интерфейсов, которые реализует этот объект. Т.е Вы иммитируете работу CoCreateInstance. Далее работаете с этим интерфейсом, примерно так же, как если бы подняли этот объект через COM.
Перед выгрузкой Вам необходимо освободить все интерфейсы, включая IClassFactory, а затем вызвать DllCanUnloadNow.

см. также описание CoGetClassObject.




Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.013 c
4-35948
Alexander
2002-07-21 14:20
2002.09.12
Шифрую директорию функцией EncryptFile. Всё работает, но когда


6-35840
Arkady
2002-07-05 11:05
2002.09.12
Пароль доступа


3-35543
Camel
2002-08-21 13:22
2002.09.12
Компонент для Delphi 6


1-35640
Boo
2002-09-01 05:17
2002.09.12
Програмное перемещение фокуса по ячейкам StringGrid-а


1-35698
Суриков Вадим
2002-09-01 16:33
2002.09.12
Подскажите пожалуйста, как перехватить Ctrl-Alt-Del.




   Наверх