Явная загрузка .dll (Выподает "ShowMessage")

@Programmer. · Регистрация: 17.11.2010

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

Добрый денб форум, я пытаюс загрузить .dll с явным загрузком, но когда компилирую проект то выподает ShowMessage("I can't load dll"); , что я делаю неправилно? вот код (п.с .lib файл тоже добовляю), Что мне сделать чтоб загрузился .dll с явным способам?

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
__fastcall TForm24::TForm24(TComponent* Owner)
    : TForm(Owner)
{
 typedef void __cdecl(*dll_func)(char *S,char Key);
dll_func pCode = NULL;
HMODULE hDLL =  LoadLibrary(L"D:\\trydodll\\Release\\Win32\\UMyDLL.dll");
if(!hDLL)
 {
     ShowMessage("I can't load dll");
     return;
 }
 pCode =  (dll_func)GetProcAddress(hDLL,"_Code");
 if(!pCode)
 {
     ShowMessage("I cant found function");
     return;
 }
pCode(AnsiString(Edit1->Text).c_str(),'A');
 FreeLibrary(hDLL);
}

@-LeV- · 14.06.2011, 09:52

Потому что нужно проверять hDll==NULL

@Programmer. · 14.06.2011, 10:06 **[ТС]**

-LeV-,
Прверял так тоже не катит

mimicria · 14.06.2011, 10:14

C++
1
2
3
4
HINSTANCE LoadLibrary(
 
    LPCTSTR lpLibFileName   // address of filename of executable module 
   );

HINSTANCE hDLL = LoadLibrary(L"D:\\trydodll\\Release\\Win 32\\UMyDLL.dll");

@Programmer. · 14.06.2011, 10:26 **[ТС]**

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

HINSTANCE hDLL = LoadLibrary(L"D:\\trydodll\\Release\\Win 32\\UMyDLL.dll");

И так пробовал но нечего нового
а как ето понят? не понял !

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

HINSTANCE LoadLibrary(
LPCTSTR lpLibFileName // address of filename of executable module
);

@Maluda · 14.06.2011, 10:53

Programmer., код у тебя правильный, просто либо библиотека отсутствует, либо она повреждена, либо она не в формате Билдера.

@Programmer. · 14.06.2011, 11:48 **[ТС]**

Maluda,
Вот код dll - а
.cpp

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
//---------------------------------------------------------------------------
 
#include <vcl.h>
#include <windows.h>
#pragma hdrstop
//---------------------------------------------------------------------------
#pragma argsused
#include "UMyDLL.h"
int WINAPI DllEntryPoint(HINSTANCE hinst, unsigned long reason, void* lpReserved)
{
    return 1;
}
//---------------------------------------------------------------------------
char * Code(char *s, char Key)
{
    for(int i = 0; ; i++)
    {
        if(s[i] == '\0') break;
        s[i] = s[i] ^ Key;
    }
    return s;
}

.h

C++
1
2
3
4
5
6
7
8
9
10
11
12
#ifndef _UMYDLL_H
#define _UMYDLL_H
 
#ifdef __DLL__
# define DLL_EI __declspec(dllexport)
#else
# define DLL_EI __declspec(dllimport)
#endif
 
extern "C" char * DLL_EI Code(char *s, char Key);
 
#endif

.dll проект и .h сохраняю в одном папке (D:\trydodll) потом загружаю его с явным вызовам спомошю етого кода и добавляю в проект .lib файл

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
__fastcall TForm24::TForm24(TComponent* Owner)
        : TForm(Owner)
{
 typedef void __cdecl(*dll_func)(char *S,char Key);
dll_func pCode = NULL;
HMODULE hDLL =  LoadLibrary(L"D:\\trydodll\\Release\\Win32\\UMyDLL.dll");
if(!hDLL)
 {
     ShowMessage("I can't load dll");
     return;
 }
 pCode =  (dll_func)GetProcAddress(hDLL,"_Code");
 if(!pCode)
 {
     ShowMessage("I cant found function");
     return;
 }
pCode(AnsiString(Edit1->Text).c_str(),'A');
 FreeLibrary(hDLL);
}

Люди что я делаю неправылно?

mimicria · 14.06.2011, 12:00

Сообщение от Programmer.

и добавляю в проект .lib файл

А зачем это, если вы динамически подключаете библиотеку?

Добавлено через 1 минуту

Сообщение от Programmer.

.dll проект и .h сохраняю в одном папке (D:\trydodll)

Dll-проект скомпилирован? Сам файл библиотеки UMyDLL.dll есть ?

@Programmer. · 14.06.2011, 12:03 **[ТС]**

mimicria,

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

А зачем это, если вы динамически подключаете библиотеку?

я знаю что для етого .lib тоже требуется

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

Dll-проект скомпилирован? Сам файл библиотеки UMyDLL.dll есть ?

Да истественно, без компоновкы и создания .dll как его можно загружать.

mimicria · 14.06.2011, 12:27

Сообщение от Programmer.

я знаю что для етого .lib тоже требуется

Освежите ваши знания. Для динамической загрузки dll нужна только сама библиотека. Никаких lib.

Добавлено через 19 минут
Например, тут почитайте

@Programmer. · 14.06.2011, 13:10 **[ТС]**

mimicria,

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

Освежите ваши знания. Для динамической загрузки dll нужна только сама библиотека. Никаких lib.

Спасибо за обяснение

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

Например, тут почитайте

Вроде и так делаю

mimicria · 14.06.2011, 13:15

Сообщение от Programmer.

Вроде и так делаю

Нет, не так. Попробуйте и сравните на вкус =)

@Programmer. · 14.06.2011, 13:23 **[ТС]**

C++
1
2
3
4
5
6
7
8
HINSTANCE hDLL= LoadLibrary(L"C:\\windows\\system32\\netapi32.dll");
if(!hDLL)
 {
     ShowMessage("I can't load dll");
     return;
 }
 else
 ShowMessage("Dll is loaded");

вот я етот код тоже пробовал но не загружается, как можно не загружатся netapi32.dll

mimicria · 14.06.2011, 13:32

Хмм, странно. А если так:

C++
1
HINSTANCE hDLL= LoadLibrary("C:\\windows\\system32\\netapi32.dll");

@Programmer. · 14.06.2011, 13:52 **[ТС]**

mimicria,

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

Хмм, странно. А если так:
Код C++1 HINSTANCE hDLL= LoadLibrary("C:\\windows\\system32\\neta pi32.dll");

Тоже не пашет

Добавлено через 7 минут
mimicria,
А билдер у вас какой?

mimicria · 14.06.2011, 14:00

Сообщение от Programmer.

А билдер у вас какой?

6.0
Это принципиально?

@Programmer. · 14.06.2011, 14:22 **[ТС]**

mimicria,
Cпасибо всё загрузил, окозается билдер отупел, я вес етот код удалил и ShowMessage всё равно выбивало

Новые блоги и статьи Все статьи Все блоги /
Новый CodeBlocs. Версия 25.03 palva 04.01.2026 Оказывается, недавно вышла новая версия CodeBlocks за номером 25. 03. Когда-то давно я возился с только что вышедшей тогда версией 20. 03. С тех пор я давно снёс всё с компьютера и забыл. Теперь. . .	Модель микоризы: классовый агентный подход anaschu 02.01.2026 Раньше это было два гриба и бактерия. Теперь три гриба, растение. И на уровне агентов добавится между грибами или бактериями взаимодействий. До того я пробовал подход через многомерные массивы,. . .	Учёным и волонтёрам проекта «Einstein@home» удалось обнаружить четыре гамма-лучевых пульсара в джете Млечного Пути Programma_Boinc 01.01.2026 Учёным и волонтёрам проекта «Einstein@home» удалось обнаружить четыре гамма-лучевых пульсара в джете Млечного Пути Сочетание глобально распределённой вычислительной мощности и инновационных. . .	Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Programma_Boinc 28.12.2025 Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / ********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / ********/ gallery/ bKBkQFf Пост отсюда. . .	Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США. Programma_Boinc 26.12.2025 Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .
Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка. Programma_Boinc 23.12.2025 Рецензия / Мнение/ Перевод Нашел на реддите интересную статью под названием The Thinkpad X220 Tablet is the best budget school laptop period . Ниже её машинный перевод. Thinkpad X220 Tablet —. . .	PhpStorm 2025.3: WSL Terminal всегда стартует в ~ and_y87 14.12.2025 PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .	Как объединить две одинаковые БД Access с разными данными VikBal 11.12.2025 Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.	Новый ноутбук volvo 07.12.2025 Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro	Музыка, написанная Искусственным Интеллектом volvo 04.12.2025 Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .

@-LeV- 103 / 74 / 10 Регистрация: 29.05.2010 Сообщений: 192
	14.06.2011, 09:52
	Потому что нужно проверять hDll==NULL 0

@Programmer. Прогер 632 / 263 / 15 Регистрация: 17.11.2010 Сообщений: 1,371 Записей в блоге: 2
	14.06.2011, 10:06 [ТС]
	-LeV-, Прверял так тоже не катит 0

@Maluda 1280 / 598 / 116 Регистрация: 18.08.2009 Сообщений: 832
	14.06.2011, 10:53
	Programmer., код у тебя правильный, просто либо библиотека отсутствует, либо она повреждена, либо она не в формате Билдера. 1

@Programmer. Прогер 632 / 263 / 15 Регистрация: 17.11.2010 Сообщений: 1,371 Записей в блоге: 2
	14.06.2011, 14:22 [ТС]
	mimicria, Cпасибо всё загрузил, окозается билдер отупел, я вес етот код удалил и ShowMessage всё равно выбивало 0