Как правильно добавить dll библиотеку и заставить работать с ней скрипт

[k790]

Подскажите пожалуйста, нужно использовать библиотеку 7-zip32.dll, если она лежит рядом со скриптом и программой всё работает, а надо её запихнуть в программу. Так как это сделать?
Искал по форуму, нашёл 3 способа, но никак не не получается ими, подскажите всё варианты и как их использовать

 

[VladUs]

Во-первых хотелось бы взглянуть на эти 3 способа, во-вторых существует функция FileInstall()

 

[k790]

1-FileInstall() как собственно ты и написал
2-через AutoIt3Wrapper_Res_File_Add и _LoadResourceData как-то
3-через Reshaker

 

[edward_freedom]

А DllCall

 

[k790]

edward_freedom [?]

А DllCall

А по подробнее

 

[VladUs]

k790 [?]

1-FileInstall() как собственно ты и написал

Пример кода пожалуйста

 

[CreatoR]

k790
Я же тебе написал как это делается:

Global $sDLL_7ZIP = @TempDir & "\7-zip32.dll"
FileInstall(".\7-zip32.dll", $sDLL_7ZIP, 1)
Global $hDLL_7ZIP = DllOpen($sDLL_7ZIP)
If $hDLL_7ZIP = -1 Then Exit 1

7-zip32.dll при компиляций должен находиться в папке со скриптом.

 

[k790]

CreatoR [?]

Я же тебе написал как это делается:

В том то и дело, что не получается, смотри начало кода

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_icon=D:\Архив\ICONVISTA\Icon_617.ico
#AutoIt3Wrapper_Res_Language=1049
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <7Zip.au3>
#include <ButtonConstants.au3>
#include <ProgressConstants.au3>
#include <WindowsConstants.au3>
#include <StaticConstants.au3>
#include <GUIConstants.au3>

Global $sDLL_7ZIP = @TempDir & "\7-zip32.dll"
FileInstall(".\7-zip32.dll", $sDLL_7ZIP, 1)
Global $hDLL_7ZIP = DllOpen($sDLL_7ZIP)
If $hDLL_7ZIP = -1 Then Exit 1
$hMain_GUI = GUICreate("OAC Backup & Recovery", 546, 386, 212, 90)

 

[CreatoR]

k790 [?]

В том то и дело, что не получается

Что не получается?

смотри начало кода

Смотрю, и что дальше? :reading_book:

 

[k790]

CreatoR [?]

Что не получается?

Программа не включаеся

 

[CreatoR]

k790 [?]

Программа не включаеся

Возможно проблема с правами на запись?

Что возвращает это:

MsgBox(0, "", FileExists($sDLL_7ZIP)) ;помести перед «If $hDLL_7ZIP...»

?

 

[k790]

CreatoR [?]

Что возвращает это:

1

 

[CreatoR]

k790 [?]

1

Тогда не вижу проблемы.
Ты уверен что скрипт завершает свою работу именно на строчке проверки открытия Dll?

 

[k790]

CreatoR [?]

Ты уверен что скрипт завершает свою работу именно на строчке проверки открытия Dll?

Ну подумай сам:
1) Если dll рядом, то всё работает
2) Без добавления этого плагина всё работало.
То есть проблема из-за dll, может udf косячит или не правильно используется библиотека.

 

[CreatoR]

k790 [?]

Ну подумай сам

За тебя ещё и думать надо?

Ты должен проверять всё на деле, а не теорией заниматься.

Посмотри в заголовок файла 7zip.au3, сразу поймёшь в чём дело.

 

[k790]

CreatoR[?]

За тебя ещё и думать надо?

Нет, я сам подумал и сделал вывод
[?]

Посмотри в заголовок файла 7zip.au3, сразу поймёшь в чём дело.

Не понял

 

[CreatoR]

k790 [?]

Не понял, может

Тебя не смущает это:

Global $hDLL_7ZIP = DllOpen(@ScriptDir & "\7-zip32.dll")
If $hDLL_7ZIP = -1 Then Exit 1

?


Убери проверку и будет тебе счастье.

 

[k790]

CreatoR
Вечное тебе спасибо.

А насчёт других вариантов добавления файлов в скрипт?

 

[CreatoR]

k790 [?]

А насчёт других вариантов добавления файлов в скрипт?

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