Форум: "Основная";
Текущий архив: 2003.02.10;
Скачать: [xml.tar.bz2];

Вниз

LoadLibrary   Найти похожие ветки 

← →
OpoloXAI   (2003-01-30 14:12) [0]

Добрый день.
Помогите разобраться:
DllHandle:=LoadLibrary("MyDll.dll");
ShowMessage(IntToStr(DllHandle));
Finally FreeLibrary(DllHandle);
{сама Dll расположена в директории с исполняемым файлом}
Если запускаю из-под Delphi, то нормально определяеся Handle и всё работает нормально, но если я запускаю это приложение из-под Windows{Far}, то всегда возвращается Handle=0. Почему?
Заранее спасибо.

---

← →
han_malign   (2003-01-30 14:21) [1]

GetLastError...

---

← →
REA   (2003-01-30 14:24) [2]

Надежнее конечно полный путь прописать или кинуть DLL в System.

---

← →
anbezr   (2003-01-30 14:26) [3]

надо, чтобы DLL лежала в папке, к которой есть PATH или в начало программы надо добавить:

SetCurrentDir(ExtractFilePath(Application.ExeName));

должно работать...

---

← →
Cancel   (2003-01-30 14:27) [4]

DLLFileName:= ExtractFilePath(ParamStr(0)) + "MyDll.dll";
DllHandle:=LoadLibrary(PChar(DLLFileName));
ShowMessage(IntToStr(DllHandle));
if DllHandle > 0 then
try
.....
finally
FreeLibrary(DllHandle);
end;

---

← →
Cancel   (2003-01-30 14:38) [5]

>>надо, чтобы DLL лежала в папке, к которой есть PATH или в >>начало программы надо добавить:
>>
>>SetCurrentDir(ExtractFilePath(Application.ExeName));
>>
>>должно работать...

- CurrentDir может поменяться после вызова например диалога сохранения или открытия файла.

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2003.02.10;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.45 MB
Время: 0.008 c