Вызов Delphi DLL из MS Visual C++

Во-первых, создайте в Delphi простую DLL:

{ Начало кода DLL }

library
 MinMax;

function
 Min(X, Y: Integer): Integer; export;
begin

  if
 X < Y then

    Min := X
  else

    Min := Y;
end
;

function
 Max(X, Y: Integer): Integer; export;
begin

  if
 X > Y then

    Max := X
  else

    Max := Y;
end
;

exports


  Min index
 1,
  Max index
 2;

begin

end
.

{ Конец кода DLL }

Затем, для вызова этих функций из вашего C кода, сделайте следующее:

В вашем .DEF-файле добавьте следующие строки:

IMPORTS

  Min  =MINMAX.Min
  Max  =MINMAX.Max

Объявите в вашем C-приложени прототип функций, как показано ниже:

    int FAR PASCAL Min(int x, y);
    int FAR PASCAL Min(int x, y);

Теперь из любого места вашего приложения вы можете вызвать функции Min и Max.

Другое по теме:

• Надо подключить DLL и использовать некоторые ее функции
• DLL - убийственная утилита
• DLL и ресурсы