Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Delphi: Общие вопросы > Delphi and Visual C++


Автор: ASGDeveloper 15.11.2007, 17:15
И так, есть dll-ка написанная на дельфях:
Код

library test;

uses
  Windows;

{$R *.res}

function Sum(A, B: Integer): Integer; stdcall; export;
begin
  Result := A + B;
end;

procedure Hello; stdcall; export;
begin
  MessageBox(0, 'Hello World', 'Test Application', MB_ICONASTERISK);
end;

exports Sum, Hello;

begin
end.


Может ли приложение написаное в Visual C++ 6.0 вызвать методы Sum и Hello из такой библиотеки? И если может то как? (если можно, то хотелось бы кусочек кода).

Автор: Alexeis 15.11.2007, 17:29
ASGDeveloper, может, но только динамической линковкой (при помощи LoadLibrary), для статической ему нужен еще lib файл с секцией импорта, а его делфя не генерит.

Автор: ASGDeveloper 15.11.2007, 19:22
Цитата(Alexeis @  15.11.2007,  17:29 Найти цитируемый пост)
но только динамической линковкой

Вот именно кусочек кода для такого варианта меня и интересует. Наверное основная трабла в переводе типов дельфы в сишный код. Потому что (как я думаю) общий принцип работы тот же что и в дельфе:
Код

h = LoadLibrary('test.dll')
proc = getProcAddress(h, 'Sum')
proc(1, 2)

Автор: Alexeis 15.11.2007, 19:27
У сишников в разделе поищи. Там я несколько тем видел. Директивы там идут хитрые при объяве прототипов функций.

Автор: ASGDeveloper 15.11.2007, 19:50
Код

typedef int (*Sum)(int a, b)

Так?

Автор: Alexeis 15.11.2007, 21:06
Ааа вот вспомнил! В C++ по умолчанию параметры передаются как cdecl, а у тебя в Dll они stdcall

Добавлено через 2 минуты и 29 секунд
Код

  typedef int WINAPI (*Sum)(int a, b)


Думаю вот так будет верно. WINAPI - это тоже что и stdcall

Добавлено через 5 минут и 35 секунд
Код

 typedef int WINAPI (__stdcall *Sum)(int a, b)

 Вот так еще можно.

Автор: ASGDeveloper 15.11.2007, 22:26
Цитата(Alexeis @  15.11.2007,  21:06 Найти цитируемый пост)
от так еще можно. 

Сишники тут подсказывают, говорят нужно так:
Код

typedef int (__stdcall *Sum)(int a, int b)

Автор: Alexeis 16.11.2007, 01:12
ASGDeveloper, точно! я и не заметил, что ты параметры через запятую указал. Все верно.

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)