Прога использует dll, в моем случае opal.dll
Dll и весь environment подгружается при старте приложения при запуске dll (ф-ция возвращает handle):
1.
2.
3.
Public Declare Function OpalInitialise Lib "opal.dll" (ByRef Version As Long, ByVal options As String) As Long
opal_hwnd = OpalInitialise(OPAL_C_API_VERSION, init_str)
При некоторых изменениях параметров работы мне надо полностью перегрузить environment,
т.е. я делаю:
1.
2.
3.
4.
Public Declare Function OpalShutDown Lib "opal.dll" (ByVal opal As Long) As Long
OpalShutDown opal_hwnd
opal_hwnd(new) = OpalInitialise(OPAL_C_API_VERSION, init_str)
Все это работает без крашей, НО:
Я обратил внимание, что потом при выполнении нек. ф-ций программа может давать (не сумел отдебажить почему, характер случайный) сбои (crash) ПОТОМ.
Также я обратил внимание на то что если сделать "паузу".
1.
2.
3.
OpalShutDown opal_hwnd
Msgbox "paused"
opal_hwnd(new) = OpalInitialise(OPAL_C_API_VERSION, init_str)
То на момент
Msgbox "paused"
я не могу ручками удалить "opal.dll"
Т.е. библиотека остается "подгруженной", хотя и не используется (старую конфигурацию выгрузили, новую еще не грузили).
Проблема:
Полностью закрываем VB6 приложение, потом делаем загрузку всего по новой -> все работает без сбоев
Просто перегружаем opal_hwnd (без закрытия VB6 обертки) -> могут быть определенные сбои при дальнейшей работе opal.dll
Есть конечно ручной способ загрузки-выгрузки
1.
2.
hMod = LoadLibrary("opal.dll")
FreeLibrary hMod
Но я как-то с этим игрался, мне что-то не понравилось, и я доверяюсь OpalInitialise, соответственно hMod мне не известен.
Я предполагаю, что простой способ решения проблемы - отцепить opal.dll от VB6 проги и
полностью загрузить ее по новой.
Грубо говоря,
Как мне сделать
FreeLibrary hMod
если я не знаю этого hMod, но знаю имя dll.
Чтобы в режиме "остановки" (но без выгрузки VB6-проги) я мог ручками удалить "opal.dll", и винды мне это позволяли бы делать.
