Что теоретически невозможно сделать на VB?

[tyomitch]

Ладно, забить на игру слов... Просто я под интерфейсом понимал другое, чем MSDN-овцы.
Суть-то в том, что VTable общая у всех экземпляров одного класса. А как обзывать указатели на указатели на неё - личное дело каждого.

[ANDLL]

Так что с этим:

2tyomitch: Ты не понял. VBA-проект использует VB-DLL. Каким образом он сможет обращаться к членам класса. Или же VB-EXE использует VB-DLL. Тот же вопрос. Он же не может определить, на каком языке написана DLL

[GSerg]

А зачем ему знать, на каком языке они написаны?
Зачем вообще компиляция, если после неё неважно, на чём оно было написано?

[ANDLL]

Вот я и спрашиваю: как?

[tyomitch]

По информации, сохранённой внутри скомпилированного файла.
Почему ты, собственно, решил, что к методам VBA умеет обращаться, а к переменным - нет?

Ещё посмотри ITypeInfo::GetVarDesc, может станет понятнее.

[ANDLL]

Гм. Темыч, стандарт COM не предусматривает открытых переменных без get/put. Т.е.: или VBA определяет, что эта либа написана на VB, и действует в обход COM, либо VBA таки использует get/put.

[tyomitch]

Гм. Темыч, стандарт COM не предусматривает открытых переменных без get/put.

Неужели? А к чему тогда относится ITypeInfo::GetVarDesc

Чесслово, ты в PSDK хоть заглянул, прежде чем отвечать? Я же тебе конкретный метод назвал...

[tyomitch]

Наверное, как Object which impements COM Interface

А что здесь такое "object"?

[бред]
Неужели никто, вводя новые понятия, не может дать им нормальных (=последовательных, систематичных) определений?
Сдаю в этом семестре Джаву: курс совместно разработан Cisco и Sun. В лекции даётся определение: "class is the blueprint for an object". Казалось бы, ничего себе метафора, но это именно их определение: в зачёте по лекции на вопрос "что такое класс" нужно отвечать именно так, и в итоговом тесте тоже. Меня не покидает ощущение, что нас принимают за телепузиков... Блин, какие чертежи внутри компа?
[/бред]

[ANDLL]

Гм. Темыч, стандарт COM не предусматривает открытых переменных без get/put.

Неужели? А к чему тогда относится ITypeInfo::GetVarDesc

Чесслово, ты в PSDK хоть заглянул, прежде чем отвечать? Я же тебе конкретный метод назвал...

Вот чего не читал, того не читал... Признаю свою вину, меру, степень, глубину, что скажите все приму: ссылку, катаргу, тюрьму, но желательно в июле и желательно в Крыму.

Только вот это:

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

Public A as string
Public B as string

Public sub C()

end sub


Преобразуется в это:

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


    [
      odl,
      uuid(664BF320-AA9D-421D-A367-8D23C7BA1F8F),
      version(1.0),
      hidden,
      dual,
      nonextensible,
      oleautomation
    ]
    interface _Class1 : IDispatch {
        [id(0x40030000), propget]
        HRESULT A([out, retval] BSTR* A);
        [id(0x40030000), propput]
        HRESULT A([in] BSTR A);
        [id(0x40030001), propget]
        HRESULT B([out, retval] BSTR* B);
        [id(0x40030001), propput]
        HRESULT B([in] BSTR B);
        [id(0x60030000)]
        HRESULT C();
    };


Т.е. по правилам COM, если клиент использует интерфейс _Class1, то обращается к переменным объекта он через get/put. Или я опять ченго-то недогоняю?

[tyomitch]

Угу, теперь найди реализацию этих методов в самом компоненте.
Я не нашёл, и сделал вывод, что их там нет
К чему относятся эти записи в TLB - у меня нет никаких догадок :-/
Но явно не к методам, раз таких методов в коде нет

И посмотри-таки на ITypeInfo::GetVarDesc

[ANDLL]

2tyomitch: Посмотрел, но есть подозрение, что это чисто информационная функция.
ты думаешь, что если программа, скажем на Cpp создаст экземпляр этого класса и попросит узнгать значение переменной A, то она завалится? Ведь если у этого метода нет реализации, то именно так и должно произойти.

[tyomitch]

2tyomitch: Посмотрел, но есть подозрение, что это чисто информационная функция.

Вот именно. Это ответ на твой вопрос "откуда VBA знает". От информационной функции.

ты думаешь, что если программа, скажем на Cpp создаст экземпляр этого класса и попросит узнгать значение переменной A, то она завалится? Ведь если у этого метода нет реализации, то именно так и должно произойти.

Хз, я не пробовал
А почему ты решил, что VC тупее VBA? Хотя может, какая-нибудь прога на VC4, не знающем о существовании публичных переменных, и завалится.

[GSerg]

А что здесь такое "object"?

Конкретно здесь должно быть что-то вроде "Сущность, инкапсулирующая в себе..."

"class is the blueprint for an object". Меня не покидает ощущение, что нас принимают за телепузиков... Блин, какие чертежи внутри компа?

Хм... А мне нравится... И в каком-то смысле это даже хорошо даёт представление о том, чем класс отличается от экземпляра класса...

[tyomitch]

А что здесь такое "object"?

Конкретно здесь должно быть что-то вроде "Сущность, инкапсулирующая в себе..."

Угу. "COM-объект = сущность, инкапсулирующая в себе, которая реализует указатель на указатель на VTable." Я правильно скомбинировал три определения?


ЗЫ: если бы на экзамене по математике на вопрос "что такое биссектриса" правильным ответом считалось "это крыса, которая бегает по углам", это бы тебя тоже заводило?

[ANDLL]

Так, Темыч, надеюсь это тебя убедит:

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

   _Class1* cls;
   CLSID cls_id,int_id;
   CoInitialize(0);
   UuidFromStringW(L"FE4E036B-716A-4639-A9EF-9E1C4E7C54DF",&cls_id);
   UuidFromStringW(L"664BF320-AA9D-421D-A367-8D23C7BA1F8F",&int_id);
   CoCreateInstance(cls_id,0,CLSCTX_INPROC_SERVER,int_id,(void**)&cls);
   if(!cls)
      throw 10;
   cls->A=SysAllocString(L"AAA");
   BSTR a=cls->A;
   cls->Release();


Эта программа просто создает класс, и вызывает put и get через vtable для записи и считывания строки. Что скажешь? Что Cpp перезаписывает вызовы put/get на какие-то левые вызовы? и если ты так вершиь в магию мануал, то найди мне в них хоть какое-нибудь упоминание про возможность обращения к открытым переменным классам, избегая get/put. Ну хотя-бы оператор IDL, что бы объявить такую переменную.

[tyomitch]

Ещё не убедило, но обещаю на днях поковыряться самому

[tyomitch]

Йоп.... Так вот, оказывается, зачем из msvbvm экспортируются PutMem* - VTable ссылается прямо на эти экспорты, а не в код самого компонента.
Это, однако, не запрещает "продвинутым" клиентам узнавать о наличии публичных переменных через ITypeInfo::GetVarDesc и обращаться к ним напрямую.