как подключить dllки с произвольной папки

← →
Zorik © (2003-08-19 16:11) [0]

Мастера помогите! Может вопрос детский - прошу не судить. У меня есть свои проэкты которые совмесно используют некоторые библиотеки. Как подключить эти библиотеки если они находятся и не вкорневом каталоге и не в системном, а в отдельном?

← →
Юрий Федоров © (2003-08-19 16:12) [1]

LoadLibrary - укажи полный путь

← →
ermserg © (2003-08-19 16:12) [2]

Ukazat polniy put k filu

← →
Zorik © (2003-08-19 16:18) [3]

<<Юрий Федоров © (19.08.03 16:12) [1]
Я понял это в Делфи. Значит не подходит
<<ermserg © (19.08.03 16:12) [2]
Наверное тоже не покатит. Я же буду делать инсталяху. На разных компах, в разных директориях, а?

← →
VAleksey © (2003-08-19 16:21) [4]

При инсталляции добавь в системную переменную Path пути к твоим dll-кам.

← →
Юрий Федоров © (2003-08-19 16:21) [5]

пропиши в системные Path при инсталляции, наверно другого пути нет.
Хотя я в таком случае все же использую полные пути, которые получаю динамически из относительных.
Например я знаю, что DLL должна быть в подпапке с определенным именем родительской папки относительно папки моего exe"шника

← →
Zorik © (2003-08-19 16:27) [6]

Спасибо а поточнее как прописать не скажите?
У меня будет типа
...Program Files/CompanyName/Lybrarys/ - dll and other
...Program Files/CompanyName/Project1/ - прога
...Program Files/CompanyName/Project2/ - прога
...Program Files/CompanyName/Project3/ - прога

← →
Dred2k © (2003-08-19 16:43) [7]

DLLName := ExtractFilePath(ParamStr(0)) + "\..\Lib\dll01.dll"
Винда понимает "предыдущие каталоги" (..) в путях. И не нужно никаких переменных среды, просто требование к инсталляции.
Пробовать все нужно, а не сразу тревогу бить. ;)

1. ExtractFileDir(application.exename)
2. выкинуть из строки все после последнего слеша
3. добавить "Lybrarys\mydll.dll"

Я понимаю и папку екзешника умею найти , но как это здесь прописать с переменными:
{$IFNDEF MIF} function ShowForm1(AHandle: THandle): LongInt; StdCall; external "MIF.DLL" name "ShowForm"; procedure CloseForm1(AFormRef: LongInt); StdCall; external "MIF.DLL" name "CloseForm"; {$ENDIF}

как подключить dllки с произвольной папки Найти похожие ветки