Подключить библиотеку dll

@bedvit · Регистрация: 20.05.2016

Студворк — интернет-сервис помощи студентам

Данным диалектом Бейсика не пользуясь, но иногда здесь бываю. Решил немного поучаствовать. Собственно вопрос в следующем: можно ли пользоватся сторонними библиотеками в этом диалекте, насколько сложен процесс использования? Цель - есть своя xll для VBA, можно убрать обертку будет dll, выложу здесь для тех кто много считает, большими числами) (Гугл не спрашивал ибо важно понять, есть целесообразность в данном продукте?)

@Quiet Snow · 01.04.2018, 00:10

Сообщение от The trick

маршалинг. В STA

Слов то таких не знаю, да и не особо хочется если честно)))

Сообщение от The trick

Формат модулей VST3 основан на COM

Это печально. Да и в принципе не сильно он нужен. Мож до пенсии и разгребу)))

Сообщение от bedvit

Quiet Snow, а в чем сложность, что нужно портировать, что изучать?

Сложность в том, что не использую 4GL вовсе. А чтобы чем-то реально пользоваться со знанием,
а не тыкать пальцем - нужно изучить. Т.е. осознавать, что реально происходит с данными в памяти.
Чтобы изучить этот самый COM, помню, люди говорили надо прочитать и понять стопку толстых книг,
что для меня не один год.
Т.е. делать это ради того, чтобы протестировать чью-то программу - занятие нецелесообразное.
Просто так лезть не понимая сути вопроса - это ну совсем бичарство, так не делаю.

Просто не могу понять зачем всё это вообще нужно. В чём профит простыми словами?
Т.е. чтобы открыть этот драный COM нужно переписать тот исходник Анатолия на FB.
А чтобы его переписать нужно понять, что он делает, что делает каждая его функция,
это время, т.е. дофига времени.

Сообщение от Pro_grammer

Для FB есть AxSupport TypeLibraryBrowser. Генерирует все нужные заголовки найденных COM в системе сразу в коде FB.
Интегрируется с FBEdit. Всё уже придумано:

Посмотрю на досуге. Но правда толку, у bedvit-a же 64 битная библа.

@bedvit · 01.04.2018, 10:26 **[ТС]**

Не думал что так сильно отличаются диалекты Basic. В VBA - подключение элементарно одной строкой CreateObject("имя библиотеки") . как по мне куча толстых книг нужна разработчику (да и это в случае если с нуля делать все руками, что редкость), клиенту только знать как подключить.
Профит если совсем просто в том, что можно реализовать ООП в dll, на разных языках и для разных языков, т.е. передать класс/объект между языками/компиляторами. А это в свою очередь нужно, т.к. есть структуры(классы), которые нельзя привести к стандартным типам, которые можно было бы передать через win api функции или процедурные dll (моё узкое мнение, специалисты поправят, если где нужно).

@locm · 01.04.2018, 12:20

Не по теме:

Сообщение от bedvit

создаешь объект CreateObject()

Представьте что в ЯП нет CreateObject(). Это примерно как в 1C загрузить обычную DLL с функциями.

@Quiet Snow · 01.04.2018, 14:07

Сообщение от bedvit

что редкость

Это не редкость, это становится суровой необходимостью, потому что уровень халатности
непреклонно растёт, к сожалению. И мы, старые вояки кодеры, начинаем себя даже
комфортнее чувствовать.

Сообщение от bedvit

как по мне куча толстых книг нужна разработчику

Не про это речь веду, разумеется нужна. Нужно просто знать ради чего что-то делаешь,
вот вы к примеру знаете для чего и для кого вы пишете? Судя по постам знаете, но тогда
если мало или нет тестеров то нужна подача какая-то более грамотная, например видео
по использованию, посты на форумах и т.п.
Это говорю к тому, что у меня, например, своей литературы и исходников столько, что
до конца жизни разгребать, особенно когда ещё голова забита другими вещами.
Анатолий(the trick) прекрасно понимает что это за область, но он, конечно, более
прошаренный и талантливый во всех смыслах, мне до его уровня пердеть и пердеть.

Сообщение от bedvit

Не думал что так сильно отличаются диалекты Basic.

Да в FB уже много чего наворотили, просто этим не пользуюсь, расшерстил и
хожу по протоптанной дорожке.

@The trick · 01.04.2018, 21:03

Сообщение от Quiet Snow

Слов то таких не знаю, да и не особо хочется если честно)))

Просто ты не писал многопоточное приложение работающее с COM объектами.

Сообщение от Quiet Snow

Это печально. Да и в принципе не сильно он нужен. Мож до пенсии и разгребу)))

Что печально? VST2 тоже объектно-ориентированный.

Сообщение от Quiet Snow

А чтобы чем-то реально пользоваться со знанием, а не тыкать пальцем - нужно изучить.

Так со всем.

Сообщение от Quiet Snow

Чтобы изучить этот самый COM, помню, люди говорили надо прочитать и понять стопку толстых книг, что для меня не один год.

Если ты разработчик, а если ты просто клиент то это не нужно.

Сообщение от Quiet Snow

Просто не могу понять зачем всё это вообще нужно. В чём профит простыми словами?

Потому что это намного удобнее. Пользователь работает с объектами которые могут быть в разных процессах, машинах единообразно.

Сообщение от Quiet Snow

нужно переписать тот исходник Анатолия на FB

Не нужно. Тот исходник помимо работы с COM предоставляет возможность работы с ActiveX.

Сообщение от Quiet Snow

Посмотрю на досуге. Но правда толку, у bedvit-a же 64 битная библа.

Толк есть, насколько я помню COM объект может использоваться независимо от разрядности.

Сообщение от bedvit

А это в свою очередь нужно, т.к. есть структуры(классы), которые нельзя привести к стандартным типам, которые можно было бы передать через win api функции или процедурные dll

Неверно. В API функцию можно передать все что угодно. Разницы нет метод объекта или API функция. В первом случае мы имеем указатель на таблицу функций, во втором указатель получаем через GetProcAddress (ну или в импорте).

Сообщение от bedvit

В VBA - подключение элементарно одной строкой CreateObject("имя библиотеки")

Под "капотом" CreateObject это просто пара вызовов API функций CLSIDFromProgID и CoCreateInstance.

Quiet Snow,
Очень-очень грубо. Вот к примеру если ты хочешь использовать какую-либо функцию из DLL, то ты вызываешь LoadLibrary и GetProcAddress. Также ты можешь к примеру добавить функцию в импорт, что по сути тоже самое только адреса предоставит сама система. Это ясно.
В COM ты получаешь не адрес функции, а адрес на таблицу функций. Эта таблица функций называется интерфейсом. К примеру любой COM объект обязан реализовывать интерфейс IUnknown. Т.е. если ты создаешь какой-либо объект и запрашиваешь у него этот интерфейс то ты гарантировано получишь указатель на указатель на 3 функции:
QueryInterface;
AddRef;
Release.
Любой другой интерфейс должен наследоваться от IUnknown, это обозначает что любой интерфейс первыми тремя функциями содержит эти функции (QI, A, R). Запрос интерфейса осуществляется вызовом QueryInterface.

К примеру ты разрабатываешь какую-либо DAW и хочешь реализовать к ней плагины. Ты разрабатываешь интерфейc ISoundProcess который содержит 3 метода:
SetSampleRate; - установить частоту дискретизации.
SetVolume; - установить громкость.
Process; - обработать/сгенерировать звук, в зависимости от типа.
Все, Теперь любой разработчик может создать COM DLL в которой будует объект/объекты реализующие этот интерфейс. Твой хост просто запрашивает этот интерфейс и получает указатели на функции которые уже индивидуальны для каждого плагина/объекта. Таблица всегда одинакова, а функции разные. Один плагин к примеру будет на Process генерировать пилу, а другой добалять Хорус. Это удобно. В хосте ты просто пишешь вроде того:

Visual Basic
1
2
3
4
5
Dim cPlug as ISoundProcess
Set cPlug = CreateObject(любая длл)
cPlug.SetSampleRate...
cPlug.SetVolume...
cPlug.Process...

И для каждого плагина будут вызваны индивидуальные функции.
Далее к примеру ты опционально хочешь добавить возможность реализации GUI для плагина. Создаешь еще один интерфейс IGUIPlugin, в котором описываешь методы типа SetHwnd и т.д. И любой COM объект из Dll может поддерживать этот интерфейс. Удобно?
Да конечно можно сделать как говорит locm, вместо одной функции просто экспортировать каждый метод по отдельности и вызывать его, передавая каждый раз указатель на объект идентифицирующий плагин/эффект.
Но если к примеру ты захочешь сделать более отказоустойчивую систему, то ты можешь COM объект загрузить в другой процесс. Или к примеру твое приложение 64 битное а Dll 32 битная, ты просто используешь COM surrogate (dllhost.exe). Но фишка в том что от тебя почти ничего не требуется, в хосте как был код так и остался (к примеру посмотри работу с Excel/Word из VB6 там объект живет в другом процессе, а работаешь ты с ним точно также как с любым другим). Всю работу по синхронизации, транспортировке данных между процессами берет на себя Windows. Попробуй теперь так с экспортом функций сделать?
Второй момент, если твоя DLL работает в многопоточном приложении и ты опрашиваешь объект из разных потоков то становится критичной проблема синхронизации. В STA каждый объект изолирован и всю работу по синхронизации выполняет Windows. Ты также просто вызываешь метод объекта, Windows транспортирует данные между потоками, ждет обработки и возвращает результат, тебе не нужно думать о синхронизации и т.п. ты просто вызываешь метод (функцию по указателю). COM объект работает в том потоке в котором был порожден и никаких проблем с синхронизацией не возникает. Удобно? Попробуй сделать тоже самое с экспортом функций. Фишка в том что от разработчика эти действия не требуются это реализуется все Windows.

@bedvit · 01.04.2018, 22:42 **[ТС]**

Сообщение от Quiet Snow

И мы, старые вояки кодеры,

всегда уважал таких специалистов, хотя и сам не молод-то уже.

Сообщение от Quiet Snow

или нет тестеров то нужна подача какая-то более грамотная, например видео
по использованию, посты на форумах и т.п.

- просто тематика продукта не всем интересна, а так в блоге все описал, оформил графически, и сделал справку по интерфейсам COM (IDispatch). При наличии интереса, могу и видео по использованию добавить и оформить подробнее.

The trick, хороший пост, плюсую вам.

Сообщение от The trick

Неверно. В API функцию можно передать все что угодно.

Опыта мало, в эту тему только погружаюсь, не могу понять эту информацию. Как через API передать объект, запустить конструктор, деструктор (NEW, DELETE) для него, работать на совместимых типах данных между языками без com - интерфейса с Automation-совместимыми типами данных?
Все заворачивать в отдельную функцию и передавать посредством "EXPORTS" и "_stdcall", а в VBA смотреть через Declare?
Выходит 50 "Declare", вместо одного CreateObject?
Можно прямо на пальцах (если вас не затруднит), можно терминами VB, можно С, любыми другими (по вышепоказанным вами функциям, честно пытался усвоить инфо, видимо пока борода не выросла, не понимаю, что там бородатые дядьки запилили).

@The trick · 01.04.2018, 23:11

Сообщение от bedvit

Можно прямо на пальцах (если вас не затруднит), можно терминами VB, можно С, любыми другими (по вышепоказанным вами функциям, честно пытался усвоить инфо, видимо пока борода не выросла, не понимаю, что там бородатые дядьки запилили).

Ну вызов API функции ничем не отличается от вызова метода объекта. Если в метод можно передать все что угодно, то и в API функцию тоже, т.к. это та же самая функция.

Сообщение от bedvit

Как через API передать объект, запустить конструктор, деструктор (NEW, DELETE) для него, работать на совместимых типах данных между языками без com - интерфейса с Automation-совместимыми типами данных?

Не понимаю. Объект можно передать в API или возвратить его из API, "через API" - что имеется в виду? COM не поддерживает конструкторы. Если нужно инициализировать объект то запрашивается один из интерфейсов IPersist и далее через Load загружается состояние.

Сообщение от bedvit

Все заворачивать в отдельную функцию и передавать посредством "EXPORTS" и "_stdcall", а в VBA смотреть через Declare?
Выходит 50 "Declare", вместо одного CreateObject?

Так не делают, это просто лишнее. Зачем городить эти костыли с импортом? Чтобы потом люди ломали голову если что-то где-то не так задекларировано или вместо ссылки на объект передали что-то другое и получили вылет. Есть интерфейс - он неизменен и больше ничего не нужно.

Сообщение от bedvit

Можно прямо на пальцах (если вас не затруднит), можно терминами VB, можно С, любыми другими (по вышепоказанным вами функциям, честно пытался усвоить инфо, видимо пока борода не выросла, не понимаю, что там бородатые дядьки запилили).

Что именно? Ну к примеру на VB6 можно же создать функцию в модуле принимающую объект?

Visual Basic
1
Public Function foo(Byval l As Object) As Long

Вот также и API функция принимает объект, а правильнее сказать на интерфейс.

@Quiet Snow · 01.04.2018, 23:35

Не по теме:

Анатолий, это всё очень сложно для моих старых мозгов. С нахрапу не въеду. Уже не кодил
на серьёзных проектах больше полутора лет. Ты всё говоришь верно, но идеология locm-а мне
намного ближе, т.к. всю жизнь программировал на 3GL, это уже на уровне рефлексов забито,
менять лагерь и ЯП - уже поздно. И не сосчитать сколько раз напарывался на собственное
незнание вопроса, делать это снова т.е. лезть куда-то в огромную по объёмам информации
(и архитект. сложности этой информации) область с наивными иллюзиями - ну не вижу смысла.
Ты просто пишешь с позиции своего опыта, потому что это всё изучал фигову тучу лет и тебе
действительно это всё понятнее, объекты, интерфейсы, COM. Но с позиции человека, который кучу
лет прокодил под DOS, изрядно засрав себе всем эти дерьмом голову и потом еле еле чё-то
начал худо бедно писать под винду, вытащенный за шкирман такими крутыми кодерами как
locm и Стас - это всё полный п...ц. Т.е. ООП это точно не моё, даже если начну на нём кодить
это будет как слепой котёнок что-то тыкает и делает кучу лишнего и неадекватного.
Само собой мне оно не надо, т.к. и без того кучу времени ушло в трубу. Есть цели, есть задачи
их и долбим до победного, т.е. вообще не до жиру.

Всё это рассматриваю просто с позиции - ну есть оно и есть, с уверенностью, что почти всегда
найдётся человек, который портанёт что-то на 3GL или хотя бы распишет принцип.
Вся беда в том, что гемор возникает как раз на стыке идеологий, когда начисто кодишь на 3GL
- никаких проблем нет, всё филигранно, чистенько, всё работает надёжно.

Сообщение от The trick

Что печально? VST2

Блин ну всё печально))) просто печаль и беда...
Сам ещё даже твой пример не раскурил по первой версии, тот что на ассемблере.
На мой взгляд единственный дельный мануал по теме(ну кроме других твоих манов по звуку,
там тоже всё кошерно), в других же источниках - одни бичи дешёвые и безалаберные :D .

@bedvit · 02.04.2018, 00:47 **[ТС]**

The trick, благодарю за ответы. Попытаюсь понять ваши и пояснить свои мысли.
Используя new мы можем создать несколько объектов одного и того же класса, со своими значениями свойств и методами, как этого достичь в процедурной dll?
Про какой интерфейс вы упоминаете, в случае передачи объекта через api в процедурной dll без использования СОМ.
Как без СОМ передать объект из процедурной dll, пусть из VB6(вам он ближе?) в VBA.
Если все же СОМ нужен, то передавая через api в функции этот объект, как vba знает про его интерфейс, регистрация в реестре, манифест? Как его можно использовать? Пока не пойму.

@The trick · 02.04.2018, 10:05

Сообщение от bedvit

Используя new мы можем создать несколько объектов одного и того же класса, со своими значениями свойств и методами, как этого достичь в процедурной dll?

Объявляется функция с параметрами инициализации, в которой создается уже объект через (new, я так понимаю C++) и возвращается из функции.

Сообщение от bedvit

Про какой интерфейс вы упоминаете, в случае передачи объекта через api в процедурной dll без использования СОМ.

Да любой. COM объект это просто указатель, можно передавать вообще любой указатель а в функции разруливать его. К примеру в Windows есть понятие хендла. Вот он однозначно идентифицирует объект, так и тут. Но самое простое это просто передавать COM объект, если кто-то по непонятной причине боится работать с COM объектом у себя в приложении, то просто вызывая функцию из DLL передавая туда этот объект - самому вызывать метод. Такая функция для вызова метода, или даже функция для вызова функции

Сообщение от bedvit

Как без СОМ передать объект из процедурной dll, пусть из VB6(вам он ближе?) в VBA.

Что имеется в виду без COM? COM объект это просто указатель, в чем проблема передать указатель? Из VB6 dll я бы просто возвращал COM объект из процедурной DLL. По типу:

Visual Basic
1
2
3
4
Dll:
Public Function GetSomeObject(...) As Object
VBA:
Declare Function GetSomeObject Lib "dll" (...) As Object

Сообщение от bedvit

Если все же СОМ нужен, то передавая через api в функции этот объект, как vba знает про его интерфейс, регистрация в реестре, манифест?

Интерфейс должен быть известен для раннего связывания, для этого подключается библиотека типов в референсы (конкретно говоря о VBA, VB6), для позднего связывания используется имплементация IDispatch у сервера. Регистрация нужна лишь для того чтобы по CLSID/ProgID узнать местоположение библиотеки (это очень упрощенно там еще много параметров). Если хочется избежать регистрации то применяется Reg-Free метод что я скидывал выше. Используя контексты активации можно вообще в рантайме подключать библиотеки не регистрируя их.

Сообщение от bedvit

Как его можно использовать? Пока не пойму.

Вот пример где ActiveX Dll работает без какой либо регистрации используя манифест (статью можно не читать, т.к. статья совершенно о другом). Чтобы использовать его динамически (т.е.) как в случае VBA нужно использовать контекст активации, ссылку на Reg-Free я скинул выше там все подробно описано. Там прописывается местоположение библиотеки, CLSID, PROGID, ProxyStub и т.д. те же ключи реестра. Есть уже автоматизированные приложения создающие такой манифест.

@The trick · 02.04.2018, 12:10

Quiet Snow,
Вот простейший пример использования COM библиотеки из ассемблера (думаю это самый простой способ, не в машинных кодах же писать?

). Имеем простую ActiveX dll библиотеку написанную на VB6. В ней есть класс CTest:

Visual Basic
1
2
3
4
Public Sub ShowMsgBox( _
           ByRef sText As String)
    MsgBox sText
End Sub

Имеет один метод ShowMsgBox который показывает обычный MessageBox. Компилируем dll и определяем идентификаторы класса и интерфейса из библиотеки типов (по умолчанию она находится в dll ресурсах) например через OLEView:

CLSID - это идентификатор класса, IID - это идентификатор интерфейса. Любой класс обязан реализовывать какой-нибудь интерфейс. CLSID - однозначно определяет реализацию, а IID однозначно определяет "канал" взаимодействия. К примеру тут класс CTest, а интерфейс _CTest. Любой другой класс также может реализовывать интерфейс _CTest а метод ShowMsgBox может уже делать что-то другое.
Теперь напишем клиент для этой dll, на ассемблере (FASM):
Без деклараций и проверок на ошибок код совсем маленький:

Assembler
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
section '.text' code readable executable
 
CLSDID_CTest GUID 0x322E4E2F, 0xE105, 0x4BB0, <0x9B, 0x21, 0x4C, 0x2A, 0x6A, 0xF6, 0xDE, 0x2D>  ; {322E4E2F-E105-4BB0-9B21-4C2A6AF6DE2D} из библиотеки типов TestLib.dll
IID__CTest GUID 0xD83F0A2C, 0x3940, 0x4237, <0xB8, 0x8E, 0x70, 0x97, 0x47, 0x9D, 0x01, 0xC6>    ; {D83F0A2C-3940-4237-B88E-7097479D01C6} интерфейс из библиотеки типов TestLib.dll
sMsg BSTR "Hello!"
 
proc start
    locals
        cObject _CTest
        psMsg dd sMsg
    endl
 
    invoke CoInitialize, 0
    invoke CoCreateInstance, CLSDID_CTest, 0, CLSCTX_INPROC_SERVER, IID__CTest, addr cObject
    cominvk cObject, ShowMsgBox, addr psMsg
    invoke ExitProcess, 0
 
    ret
 
endp

Ничего сложного, все элементарно! Создали объект - вызвали метод, вот дизассемблированный листинг для понимания работы cominvk:

Не сложнее LoadLibrary и GetProcAddress. Вызов метода это просто вызов функции по указателю с передачей указателя на объект в первом параметре. Все! Никаких надуманных сложностей, километровых кодов и т.п. Дополнительно имеем большое количество преимуществ о которых я писал ранее.

Если нужно сделать работу без регистрации можно и правильнее создать Reg-Free манифест либо вручную вызвать DllGetClassObject как в моем примере в блоге. Манифест также очень простой:

XML
1
2
3
4
5
6
7
8
9
10
11
12
13
14
<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">
    <assemblyIdentity
        version="1.0.0.0"
        name="TestCOM"
        type="win32"
    />
    <file name="TestLib.dll">
        <comClass 
             clsid="{322E4E2F-E105-4BB0-9B21-4C2A6AF6DE2D}" 
             threadingModel="Apartment"                                   
        />
    </file>
</assembly>

Все теперь работает без регистрации и СМС.
Если угодно можно создать объект по имени (не по CLSID), как это делается в скриптовых языках или в VB/VBA (CreateObject), просто получив CLSID по имени (ProgId) через функцию CLSIDFromProgId. В манифесте просто нужно добавить атрибут progid="TestLib.CTest".

@bedvit · 02.04.2018, 12:28 **[ТС]**

Благодарю, действительно интересно. По первой части сообщения, в общем понятно. Под COM я подразумеваю интерфейсы COM. Выходит, как я писал выше, нужно 50 Declare Function, что бы работать с библиотекой (на количество свойств и методов), все верно?

Вторая часть посложнее:
1. При Reg-Free методе, в функцию должно передаваться местоположение DLL(манифеста)? (ведь в реестре нет записи)
Reg-Free методе и при

Сообщение от The trick

рантайме подключать библиотеки не регистрируя их

это только позднее связываение? (методы и свойства посмотреть нельзя).
А где этот манифест лежит, вместе с библиотекой?
Надо погуглить тему и вашу ссылку.
....
Пока писал появилось ваше последнее сообщение, читаю.

@The trick · 02.04.2018, 13:52

Сообщение от bedvit

Выходит, как я писал выше, нужно 50 Declare Function, что бы работать с библиотекой (на количество свойств и методов), все верно?

Скорее всего да, но опять-таки в чем смысл?

Для чего экспортировать 50 функций если эти функции уже есть в самом указателе на объект?

Сообщение от bedvit

1. При Reg-Free методе, в функцию должно передаваться местоположение DLL(манифеста)? (ведь в реестре нет записи)

Смотря где использовать. Если пишется EXE к примеру, то манифест прописывается либо в ресурсы либо в файл name.exe.manifest
Если к примеру у нас не свое приложение как VBA, то просто делаем как в секции Using the Activation Context API.

Сообщение от bedvit

это только позднее связываение? (методы и свойства посмотреть нельзя).

Ну в случае VBA, да, иначе придется подключать библиотеку в референсы, т.к. в VBA не способа объявить интерфейс без библиотеки типов (кроме конечно кастомных костылей через стандартный модуль и т.п. хаки). Свойства можно смотреть в рантайме, это не зависит от типа связывания:

@bedvit · 02.04.2018, 14:12 **[ТС]**

Сообщение от The trick

есть в самом указателе на объект?

так в случае процедурной dll откуда будет объект? выходит функции нужны.
Про name.exe.manifest читал, но у меня просто dll (потому собственно и пошел через реестр, не смог придумать как для dll прописать манифест - чтобы без регистрации в реестре). Почитаю инфо по ссылке.

Обобщая - для моей задачи подходит больше com, чем процедурная dll (с точки зрения пользователя меньше писать кода на VBA, 1С, com - поддерживающих компиляторов, но видимо не для всех языков - для них пока не понятно насколько com выигрывает). Можно попробовать пойти через манифест, ибо регистрация в реестре пугает народ (видимо). Хотя не ясно чем (можно же ведь и под пользователем регистрировать).
Минусы - нет раннего связывания, медленнее скорость обмена с dll (замерял - процентов на 50%), что существенно для быстрых вычислений (для справедливости замечу, что внутри dll скорости не меняются и не зависят от раннего или позднего связывания).

The trick, Вы как специалист с большим стажем разработки, что посоветуете добавить/убрать/переделать?

@The trick · 02.04.2018, 14:45

Сообщение от bedvit

так в случае процедурной dll откуда будет объект? выходит функции нужны.

Ну так они и есть DllGetClassObject/DllRegisterServer/DllUnregisterServer и DllCanUnloadNow. Посмотри свою DLL в любом PE вьювере.

Сообщение от bedvit

Обобщая - для моей задачи подходит больше com, чем процедурная dll (с точки зрения пользователя меньше писать кода на VBA, 1С, com - поддерживающих компиляторов, но видимо не для всех языков - для них пока не понятно насколько com выигрывает)

И для скриптовых типа vba и т.д. Ну хотелось бы посмотреть на каком языке нельзя работать с COM?

Сообщение от bedvit

Минусы - нет раннего связывания, медленнее скорость обмена с dll (замерял - процентов на 50%), что существенно для быстрых вычислений (для справедливости замечу, что внутри dll скорости не меняются и не зависят от раннего или позднего связывания).

Ну если очень нужно то можно сделать и раннее связывание без регистрации для VBA (для других не знаю), для VB6 к примеру все будет работать на раннем связывании без всяких дополнительных усилий. Просто тут как бы проблема не в том что регистрация нужна, а в том что когда добавляется библиотека в референсы она автоматом регистрируется даже если это не нужно. Я не знаю что будет в случае если dll не зарегистрируется, может быть описания интерфейсов "подхватятся" - это нужно уже тестировать и смотреть на машине с ограниченными правами. Тогда никаких проблем с ранним связыванием не будет.

Сообщение от bedvit

The trick, Вы как специалист с большим стажем разработки, что посоветуете добавить/убрать/переделать?

Я ничего. Все и так нормально (в плане архитектуры), а функционал я не тестировал.

@bedvit · 02.04.2018, 16:26 **[ТС]**

The trick, вы меня почти убедили что COM- это не плохо, хотя какое-то неприятие этой технологии народом просматривается.

Сообщение от The trick

DllGetClassObject/DllRegisterServer/DllUnregisterServer и DllCanUnloadNow

собственно DllInstall немного подпиливал, что бы по ключу "regsvr32 /n /i" пользователь регистрировался. Я имел ввиду, что если не пользоваться объектом, а функциями из процедурной dll, то нужно будет писать вместо свойств и методов объектов, столько же функций через declare (50 штук). Что как по мне, пользователю накладнее, чем одну функцию CreateObject() (VBA, 1C), другие языки наверное посложнее.
Кстати насколько сложно подключить в Freebasic? (совсем не знаю этот диалект, хочу поделится с другом библиотекой)
В гугле видел такую конструкцию для FreeBasic "dhCreateObject («Word.Application», NULL, @wdApp)"
Нашел какой-то Disphelper (библа). Видимо можно, надо гуглить.

@Quiet Snow · 03.04.2018, 20:10

Анатолий, я не пользуюсь FASM, слабо понимаю его синтаксис.
Вижу что там манифест уходит в ресурсы(которыми я тоже не пользуюсь), Comninvoke хз чем
заменить, тот адрес что в селекторе - хз откуда он его берёт.
За пример спасибо, но это опять же без соотв. навыков - х**ова туча времени чтобы разобрать.
Например если было бы в MASM без всяких locals, struc, cominvoke и т.п. тогда было бы примерно
ясно что там в деталях происходит. FASM всё прячет очень жёстко, уже обращал на это
внимание, мне крайне не импонирует этот подход, после книги Пирогова.

У меня просто сейчас не все исходники под рукой и кучу всего забыто. Думаю нужно плясать
от соответствующих WinAPI и понять как структуры описать, чтобы FB всё это сожрал.

Сообщение от bedvit

Нашел какой-то Disphelper (библа).

Помню немного работал с Disphelper по примерам, не особо вникая в то, что под капотом, хоть
это и дерьмовейший подход к программированию. Это не совсем то, там заточка под офисные
приложения. Лезть под капот не очень хочется, слишком дофига кода лопатить.

Добавлено через 1 час 11 минут
bedvit, короче попробую пошуршать всё это, если получится завести
библиотеку Анатолия с FB, тогда уже будем смотреть по вашей библиотеке.

@The trick · 03.04.2018, 22:31

Сообщение от Quiet Snow

Вижу что там манифест уходит в ресурсы(которыми я тоже не пользуюсь), Comninvoke хз чем
заменить, тот адрес что в селекторе - хз откуда он его берёт.

Не зря же я скинул дизассемблированный листинг.

@Quiet Snow · 03.04.2018, 23:02

Сообщение от The trick

Не зря же я скинул дизассемблированный листинг.

Ну мне он не особо понятен. У разных ассемблеров разный синтаксис.
Мне проще например понять
MOV ECX, бла бла бла
CALL CS:[ECX]
тут сразу видно что процедура находится по смещению ECX, чем какие-то там ссылки,
по указателям, куда-то там фиг знает куда.

К тому же что за формат строки BSTR? Я макросы эти не рублю совсем.
Также
GetTypeInfoCount
GetTypeInfo
GetIDsOfNames

Если прототипы QueryInterface, AddRef, Release я худо бедно нашёл в хедерах винды,
то где мне искать эти прототипы? Я просто пытаюсь понять всё это на самом низком
уровне. Частично сейчас смотрю разные исходники и бошка взрывается просто.
Это ужас какой-то. Объект и Виртуальная таблица как они впамяти организованы,
да хрен его знает, нигде нету информации. Хедеры все в формате си++ с кучей деректив,
который тоже не рублю.

Чую с нахрапу не получится, это реально надо рубить во всём этом.

Добавлено через 18 минут
Вопросов дофига:
Без манифеста эта штука будет работать? Т.е. если уже запускалась usage.exe.

Что происходит в invoke CoCreateInstance, CLSDID_CTest, 0, CLSCTX_INPROC_SERVER, IID__CTest, addr cObject
Т.е. CLSDID_CTest и IID__CTest - это указатели.
addr cObject - это указатель на какую структуру?
cObject в памяти как организован?
Мне же просто нужен указатель на функцию, чтобы мог передать ей управление. Или это всё работает
по другому?

@The trick · 03.04.2018, 23:04

Сообщение от Quiet Snow

Ну мне он не особо понятен. У разных ассемблеров разный синтаксис.
Мне проще например понять
MOV ECX, бла бла бла
CALL CS:[ECX]
тут сразу видно что процедура находится по смещению ECX, чем какие-то там ссылки,
по указателям, куда-то там фиг знает куда.

Сообщение от Quiet Snow

К тому же что за формат строки BSTR?

https://msdn.microsoft.com/en-... s.85).aspx

A BSTR is a composite data type that consists of a length prefix, a data string, and a terminator.

Сообщение от Quiet Snow

Также
GetTypeInfoCount
GetTypeInfo
GetIDsOfNames

Я же описал:

Сообщение от The trick

В COM ты получаешь не адрес функции, а адрес на таблицу функций. Эта таблица функций называется интерфейсом. К примеру любой COM объект обязан реализовывать интерфейс IUnknown. Т.е. если ты создаешь какой-либо объект и запрашиваешь у него этот интерфейс то ты гарантировано получишь указатель на указатель на 3 функции:
QueryInterface;
AddRef;
Release.
Любой другой интерфейс должен наследоваться от IUnknown, это обозначает что любой интерфейс первыми тремя функциями содержит эти функции (QI, A, R). Запрос интерфейса осуществляется вызовом QueryInterface.

В посте с кодом показано описание интерфейса и видно что он наследуется от IDispatch. Эти функции - просто методы этого интерфейса.

Сообщение от Quiet Snow

Если прототипы QueryInterface, AddRef, Release я худо бедно нашёл в хедерах винды,
то где мне искать эти прототипы?

Для понимания работы COM это не нужно это относится к Automation. Просто VB6 автоматом делает все классы Automation-совместимыми.

Сообщение от Quiet Snow

Я просто пытаюсь понять всё это на самом низком
уровне.

Просто вызов функции по указателю.

Сообщение от Quiet Snow

Объект и Виртуальная таблица как они впамяти организованы,

Ты не оперируешь объектами в COM, ты оперируешь интерфейсами. Получаешь указатель на интерфейс - это указатель на таблицу функций с фиксированным форматом.

Сообщение от Quiet Snow

да хрен его знает, нигде нету информации

https://msdn.microsoft.com/en-... s.85).aspx

Новые блоги и статьи Все статьи Все блоги /
Программа опроса у.з. расходомера SLS-720F Argus19 02.09.2026 Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .	Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0. Maks 31.08.2026 При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .	Архитектура биовида Стива в Майнкрафте: Зачем бонобо кубический каннибализм anaschu 30.08.2026 Кубический Вагинокапитализм в Minecraft: Математический инвариант ОДУ и рок Стивов-бонобо Главная задача разработанной «Модели Всего» — наглядно продемонстрировать наличие системной «судьбы». . .	Оттачиваю умение писать js программы. russiannick 30.08.2026 Проектом выходного дня стало написание Книги шифров Виженера. Итогом стала версия 200, синий туман. Синий туман назван так, потому что замораживает текст под собой. Нажатие синих кнопок управляют. . .
мат медиц модель 30. презентация проекта anaschu 27.08.2026 хоп хоп хоп хидахоп, а я кладую))	Как у меня протекала болезнь zorxor 27.08.2026 Здравствуйте, друзья! Эта запись блога предназначена именно для вас - для моих дорогих друзей, которые знали меня лично. Чтобы ответить на вопрос - а что же со мной произошло на самом деле? Я учился. . .	Нашел вот забавное видео о измерениях. Лучшее что я видел на эту тему kumehtar 26.08.2026 ILETXiw9bMQ Основная суть и тезисы по измерениям: 0D (Нулевое измерение): точка, не имеющая длины, ширины, высоты или объема. Объект не может перемещаться в 0D. 1D (Первое измерение):. . .	[EasyBuilder Pro] Памятка по разработке для панелей Weintek ФедосеевПавел 26.08.2026 Памятка по разработке для панелей Weintek ВВЕДЕНИЕ Ранее, при реализации проектов основное внимание уделял разработке управляющей программы для контроллера, а панели оператора доставалось время. . .

@bedvit 1210 / 261 / 22 Регистрация: 20.05.2016 Сообщений: 1,147 Записей в блоге: 22

	Подключить библиотеку dll 01.03.2017, 09:35. Показов 13331. Ответов 166 Метки нет (Все метки) Данным диалектом Бейсика не пользуясь, но иногда здесь бываю. Решил немного поучаствовать. Собственно вопрос в следующем: можно ли пользоватся сторонними библиотеками в этом диалекте, насколько сложен процесс использования? Цель - есть своя xll для VBA, можно убрать обертку будет dll, выложу здесь для тех кто много считает, большими числами) (Гугл не спрашивал ибо важно понять, есть целесообразность в данном продукте?) 0

@bedvit 1210 / 261 / 22 Регистрация: 20.05.2016 Сообщений: 1,147 Записей в блоге: 22
	01.04.2018, 10:26 [ТС]
	Не думал что так сильно отличаются диалекты Basic. В VBA - подключение элементарно одной строкой CreateObject("имя библиотеки") . как по мне куча толстых книг нужна разработчику (да и это в случае если с нуля делать все руками, что редкость), клиенту только знать как подключить. Профит если совсем просто в том, что можно реализовать ООП в dll, на разных языках и для разных языков, т.е. передать класс/объект между языками/компиляторами. А это в свою очередь нужно, т.к. есть структуры(классы), которые нельзя привести к стандартным типам, которые можно было бы передать через win api функции или процедурные dll (моё узкое мнение, специалисты поправят, если где нужно). 0

@bedvit 1210 / 261 / 22 Регистрация: 20.05.2016 Сообщений: 1,147 Записей в блоге: 22
	02.04.2018, 00:47 [ТС]
	The trick, благодарю за ответы. Попытаюсь понять ваши и пояснить свои мысли. Используя new мы можем создать несколько объектов одного и того же класса, со своими значениями свойств и методами, как этого достичь в процедурной dll? Про какой интерфейс вы упоминаете, в случае передачи объекта через api в процедурной dll без использования СОМ. Как без СОМ передать объект из процедурной dll, пусть из VB6(вам он ближе?) в VBA. Если все же СОМ нужен, то передавая через api в функции этот объект, как vba знает про его интерфейс, регистрация в реестре, манифест? Как его можно использовать? Пока не пойму. 0