VB, Cpp, COM

[ANDLL]

Я создаю проект типа MFC App Wizard(DLL) с поддержкой Automation.
Затем в StdAfx.h пишу

Код: Выделить всё

#import "msxml3.dll" rename_namespace("msxml3")
using namespace "msxml3";


Собственно вопросы, если не возражаете:
1. Переведите

Код: Выделить всё

Dim A as IXMLDOMNode
Set A=B.selectSingleNode("ndName")


На С++.

2. Объявляем в VB API:

Код: Выделить всё

Private Declare Function simpleFunc1 lib "simpleDLL.dll" (BYVAL node as IXMLDOMNode) as long
Private Declare Function simpleFunc2 lib "simpleDLL.dll" (BYREF node as IXMLDOMNode) as long

На C соответственно объявления будут выглядеть:

Код: Выделить всё

long WINAPI simpleFunc1(IXMLDOMNode node);
long WINAPI simpleFunc2(IXMLDOMNode*node);

Ан нет. Почему-то вариант с simpleFunc2 вообще не работает, а для simpleFunc1 приходиться на C++ объявлять (IXMLDOMNode*node)
Вообще-то странно: в VB передаем по ByVal, а в C++ пишем указатель.
Собственно вопрос:
а) почему так
б) нужно ли вызывать в конце simpleFunc1 node->Release();

[GSerg]

1. Хз. Сталкивался с различными именами на C++ и VB.
2. а)Ну так! Ессно... ByVal в случае с объектом - это передача не самого объекта, это как раз *. А ByRef - это **.
б) по идее нет.

[ANDLL]

1. Хз. Сталкивался с различными именами на C++ и VB.

Извини, не понял.

[GSerg]

Эээ...
Ну, в общем, не имея h, ничего не могу сказать

[Vi]

1.

IXMLDOMNodePtr A;
A=B.selectSingleNode("ndName");

2.

VB'шный IXMLDOMNode - это и есть этот С'ный тип - указатель на IXMLDOMNode. Поэтому описания будут

long WINAPI simpleFunc1(IXMLDOMNode* node);
long WINAPI simpleFunc2(IXMLDOMNode* * node);

2.а) Потому что это такие типы.

В С: IXMLDOMNode* var;
В VB: Dim var As IXMLDOMNode

б) нужно ли вызывать в конце simpleFunc1 node->Release();

Ни в коем случае. VB, конечно, не работает в терминах COM, но и здесь есть соответствие в передаче параметров: ByVal - это [in], а ByRef - это [in,out]. При этом справедливы все правила СОМа по подсчету ссылок. А именно, in-параметр всегда остается в собственности вызывающей функции.