Форум программистов, компьютерный форум CyberForum.ru

Подключение dll в MSVS 2010 C++ - C++

Восстановить пароль Регистрация
 
 
Рейтинг: Рейтинг темы: голосов - 9, средняя оценка - 4.67
cuteprog
0 / 0 / 0
Регистрация: 23.03.2013
Сообщений: 12
07.04.2013, 19:17     Подключение dll в MSVS 2010 C++ #1
Код:
C++
1
2
3
4
__declspec(dllimport) int summe(int a);
void main(){
    summe(3);
}
При компиляции выдает следующую ошибку:
error LNK2019: unresolved external symbol "__declspec(dllimport) int __cdecl summe(int)" (__imp_?summe@@YAHH@Z) referenced in function _main.

Сам dll файл был создан в Delphi, вот код:
Delphi
1
2
3
4
5
6
7
8
9
10
11
library mydll;
 
  function summe(var a: integer):integer; export;
  begin
    result:=a;
  end;
 
Exports 
summe index 1 name 'summe';
begin
end.
Для генерации mydll.lib файла был создан mydll.def со следующим содержимым:
EXPORTS
summe

Полученный в результате mydll.lib поместил в папку с проектом и прописал его в Linker -> Input -> Additional Dependencies.
Файл mydll.dll поместил в папку с exe-шником.

Что нужно сделать, что-бы оно заработало?
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
07.04.2013, 19:17     Подключение dll в MSVS 2010 C++
Посмотрите здесь:

Проблемы с кодировкой при переключении из Debug в Release в MSVS 2010 C++
C++ Где находиться папка Source Files в MSVS 2010
C++ Конвертировать с MsVS 2008 в MsVS 2010
C++ MSVS 2010 Hello world
DLL 32 и 64 в C++ 2010 C++
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
go
Эксперт C++
3582 / 1362 / 128
Регистрация: 16.04.2009
Сообщений: 4,528
07.04.2013, 21:31     Подключение dll в MSVS 2010 C++ #21
Цитата Сообщение от palva Посмотреть сообщение
С подключением def файла к проекту тоже не получается.
Ничего и не должно получится.
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
cuteprog
0 / 0 / 0
Регистрация: 23.03.2013
Сообщений: 12
07.04.2013, 23:45  [ТС]     Подключение dll в MSVS 2010 C++ #22
Цитата Сообщение от ValeryS Посмотреть сообщение
Может тебе не заморачиватся с lib если есть dll
подключай явно
Поменял код:
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
#include <windows.h>
#include <iostream>
void main(){
    int n;
    HMODULE hLib;
    hLib = LoadLibrary("mydll.dll");// открыли библиотеку
    int (*pFunction)(int,int);// прототип
    (FARPROC &)pFunction = GetProcAddress(hLib, "summe"); // указатель на функцию
    n=pFunction(2,3); // вызов функции
    std::cout<<n<<"\n";
    system("Pause");
    FreeLibrary(hLib);
}
Выдает ошибку при вызове функции:
Unhandled exception at 0x003a383a in dll_only.exe: 0xC0000005: Access violation reading location 0x00000002.

Код Delphi:
Delphi
1
2
3
4
5
6
7
8
9
10
11
library mydll;
 
  function summe(var a,b: integer):integer; stdcall; export;//добавил stdcall;
  begin
    result:=a+b;
  end;
 
Exports 
summe index 1 name 'summe';
begin
end.
Что исправить?
ValeryS
Модератор
6374 / 4840 / 441
Регистрация: 14.02.2011
Сообщений: 16,043
08.04.2013, 00:03     Подключение dll в MSVS 2010 C++ #23
Цитата Сообщение от cuteprog Посмотреть сообщение
Что исправить?
Почитай про соглашения о вызовах
хотя бы здесь
http://programming-lang.com/html/del...28/index4.html
паскаль и С по разному передают параметры и чистят стек
у тебя видать чистит стек вызываемая функция а проге на С это не нравится
palva
 Аватар для palva
2372 / 1594 / 190
Регистрация: 08.06.2007
Сообщений: 6,362
Записей в блоге: 4
08.04.2013, 00:12     Подключение dll в MSVS 2010 C++ #24
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
#include <iostream>
#include <windows.h>
 
typedef int (__stdcall *funtype)(int *, int *);
 
void main(){
    int n;
    int par1, par2;
    HMODULE hLib;
    funtype pFunction;
    hLib = LoadLibraryA("mydll.dll");// открыли библиотеку
    pFunction = (funtype)GetProcAddress(hLib, "summe"); // указатель на функцию
    par1 = 2;
    par2 = 3;
    n=pFunction(&par1, &par2); // вызов функции
    std::cout<<n<<"\n";
    system("Pause");
    FreeLibrary(hLib);
}
Добавлено через 2 минуты
У вас же в паскале параметры передаются как var
Уберите var будет по значению.
cuteprog
0 / 0 / 0
Регистрация: 23.03.2013
Сообщений: 12
08.04.2013, 00:37  [ТС]     Подключение dll в MSVS 2010 C++ #25
Спасибо!!! Заработало

Цитата Сообщение от palva Посмотреть сообщение
У вас же в паскале параметры передаются как var
Уберите var будет по значению.
если убирать var, то похоже оно адреса суммирует а не значения
palva
 Аватар для palva
2372 / 1594 / 190
Регистрация: 08.06.2007
Сообщений: 6,362
Записей в блоге: 4
08.04.2013, 00:39     Подключение dll в MSVS 2010 C++ #26
Почему адреса? var это передача по ссылке, что соответствует в си передаче по адресу.
cuteprog
0 / 0 / 0
Регистрация: 23.03.2013
Сообщений: 12
08.04.2013, 00:54  [ТС]     Подключение dll в MSVS 2010 C++ #27
Цитата Сообщение от palva Посмотреть сообщение
Почему адреса? var это передача по ссылке, что соответствует в си передаче по адресу.
при таком варианте:
Delphi
1
function summe(a,b: integer):integer; stdcall; export;//получаетя что 2+3 = 2490012
а при
Delphi
1
function summe(var a,b: integer):integer; stdcall; export;//2+3=5
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
08.04.2013, 01:08     Подключение dll в MSVS 2010 C++
Еще ссылки по теме:

Не могу вызвать функцию из dll С++ в С# в системе Win 7 64bit, MSVS 2008 C++
Подключение curl к visual studio 2010 C++
MSVS 2010. Автоматическое подключение stdafx.h ко всем новым проектам C++

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
palva
 Аватар для palva
2372 / 1594 / 190
Регистрация: 08.06.2007
Сообщений: 6,362
Записей в блоге: 4
08.04.2013, 01:08     Подключение dll в MSVS 2010 C++ #28
Проверяю:
Delphi
1
2
3
4
5
6
7
8
9
10
11
library mydll;
 
  function summe(a, b: integer): integer; stdcall; export;//добавил stdcall;
  begin
    result:=a+b;
  end;
 
Exports
summe index 1 name 'summe';
begin
end.
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
#include <iostream>
#include <windows.h>
 
typedef int (__stdcall *funtype)(int, int);
 
void main(){
    HMODULE hLib = LoadLibraryA("mydll.dll");
    funtype pFunction = (funtype)GetProcAddress(hLib, "summe");
    int n=pFunction(2, 3);
    std::cout<<n<<"\n"; // 5
    system("Pause");
    FreeLibrary(hLib);
}
Yandex
Объявления
08.04.2013, 01:08     Подключение dll в MSVS 2010 C++
Ответ Создать тему
Опции темы

Текущее время: 20:44. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru