Помогоите с OLE-Automation тип Object(VB) это VARIANT(IDL)???

← →
Галин Алексей (2003-12-01 13:59) [0]

Мне нужно написать сервер OLE-Automation
В нём нужно создать метод, имеющий два параметра типа Object

Описане метода на Visual Basic выглядит так:

Public Sub RuleMethod(ByVal fieldsObj As Object, ByVal errorObj As Object)

Вот отрывок из хелпа:
"У проверяющего метода должно быть два аргумента типа Object..."

Вопрос - какой тип для параметров мне выбирать в редакторе библиотеки типов ( Object там нет) Может
VARIANT???

Очень благодарен за любую помощь в этом вопросе.
Галин А.М.

← →
clickmaker © (2003-12-01 14:04) [1]

Вообще Object это просто указатель на объект, но поскольку это OLE, то можно IDispatch

← →
Галин Алексей (2003-12-01 15:38) [2]

Большое спасибо за ответ.
Дело сдвинулось до следующего затыка -
получение идентификатора метода с помощью
GetIDsOfNames() упаковка параметров в массив
OleVariant и вызов Invoke() со всеми этими параметрами

Разбираюсь дальше.

← →
Ломброзо © (2003-12-01 17:34) [3]

Ну здрасьте. Project->New->ActiveX-> Automation Object
IDispatch в Automation object уже реализован, не мучайте Вы так себя!

А вообще - Object в VB есть IDispatch* в IDL

← →
Галин Алексей (2003-12-02 11:54) [5]

Ещё раз рассыпаюсь благодарностсями за советы, спасшие меня от смерти

Приведённу выше проблему (получение идентификатора метода и так далее - см моё сообщение) решил следующим кодом:

STDMETHODIMP TGalin1Impl::Method4(LPDISPATCH Param1, LPDISPATCH Param2) { Variant v, v1; try { v = Param1; int i=-1; i= v.Exec( Function ("GetFieldsCount")); ShowMessage(i); v.Exec(Procedure("SetFieldByIndex") <<1 << "www" ); v.Exec(Procedure("GetFieldByIndex") <<35 << &v1 ); ShowMessage(v1); v = Unassigned; v1 = Unassigned; } catch(Exception &e) { return Error(e.Message.c_str(), IID_IGalin1); } return S_OK; }

Помогоите с OLE-Automation тип Object(VB) это VARIANT(IDL)??? Найти похожие ветки