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



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

library MinMax;

function Min(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.