Как писать ActiveX DLL на Delphi?

← →
Grim Rider (2002-02-08 17:23) [0]

Собственно сабж.
На виби все делается компилятором, а как это делать в Д? Просветите плз.

← →
Romkin (2002-02-08 17:37) [1]

New -> activeX library
New -> ActiveX object
View -> Type library
Далее заполняешь интерфейс методами и пропертями, нажимаешь refresh и реализуешь эти методы в классе
Ну а потом Run -> Register ActiveX Server

← →
Grim Rider (2002-02-08 18:21) [2]

Спасибо.
Правильно ли я понял, что:

> New -> activeX library
> New -> ActiveX object
это COM object?

> View -> Type library
> Далее заполняешь интерфейс методами и пропертями, нажимаешь
> refresh и реализуешь эти методы в классе
> Ну а потом Run -> Register ActiveX Server
А это эквивалентно "regsvr32 <activex dll>", или это делает еще что нибудь?

А не подскажите, как подключить/использовать ее в другом проекте?

Спасибо.

← →
drpass (2002-02-08 19:10) [3]

Project -> Import type library
Либо Component->Install ActiveX Control, и дальше работать с ней, как с обычной компонентой

← →
Grim Rider (2002-02-09 05:59) [4]

Чето у меня не получается... Чето я видимо делаю не так - создал простенькую activeX dll, зарегистрил ее, создал и заинсталил test.bpl.
Но как ее использовать ее в другом проекте никак не пойму... =8(

В васике все работает - там его носом тыкаешь какую библиотеку загрузить и все...

Помогите! Объясните, будьте так любезны.

← →
Grim Rider (2002-02-09 06:26) [5]

Предыдущий вопрос снимается, разобрался...
Возник, правда, другой.

Созданная б-ка имеет только один метод:
function TTActiveXTest.ShowMessage( const MessageString: WideString): HResult; begin Dialogs.ShowMessage(MessageString); end;

В основной программе пишу:
procedure TForm1.Button1Click(Sender: TObject); var t: TActiveXTest; begin t.ShowMessage("Works!"); end;
где TActiveXTest имя моего объекта.
На вызове прога вылетает с EAccessViolation.

Что я делаю не так?

Как писать ActiveX DLL на Delphi? Найти похожие ветки