Как экспортировать функции перегрузки из библиотеки DLL?

Delphi Xe.

В окне модуля.pas я вижу один из методов:

function InterlockedExchangeAdd(Addend: PLongint; Value: Longint): Longint stdcall; overload;

{$EXTERNALSYM InterlockedExchangeAdd}

function InterlockedExchangeAdd(var Addend: Longint; Value: Longint): Longint stdcall; overload;

{$EXTERNALSYM InterlockedExchangeAdd}

...

function InterlockedExchangeAdd(Addend: PLongint; Value: Longint): Longint; external kernel32 name 'InterlockedExchangeAdd';

function InterlockedExchangeAdd(var Addend: Longint; Value: Longint): Longint; external kernel32 name 'InterlockedExchangeAdd';

Означает, что DLL может экспортировать функции с одинаковыми именами.

Я пытаюсь повторить:

Я создаю проект

Program TestMyDll;



{$APPTYPE CONSOLE}



uses SimpleShareMem, SysUtils;



Function MyFunc(const X:Integer):string; StdCall; External 'MyDll.dll' Name 'MyFunc'; Overload;

Function MyFunc(const X:Extended):string; StdCall; External 'MyDll.dll' Name 'MyFunc'; Overload;



begin

  try

  Writeln;

  Writeln('MyDll test');

  Writeln('Int: ' + MyFunc(10));

  Writeln('Real: ' + MyFunc(10.55));

  Readln;

  except on E: Exception do Writeln(E.ClassName, ' : ', E.Message);end;

end.

Он компилируется нормально. Далее создаю DLL:

Library MyDll;



uses

  SimpleShareMem,

  DllUnit1 in 'DllUnit1.pas';



{$R *.res}



begin

//test

MyFunc(10);MyFunc(10.55);

end.

...и модуль DllUnit1.pas

Unit DllUnit1; Interface



Function MyFunc(const X:Integer):string; Overload; StdCall;

Function MyFunc(const X: Extended):string; Overload; StdCall;



Exports

MyFunc; // COMPILE ERROR



Implementation



Uses SysUtils;



Function MyFunc(const X:Integer):string;

begin

result:=Inttostr(x);

end;



Function MyFunc(const X: Extended):string;

begin

result:=Floattostr(x);

end;



end.

Но при компиляции я получаю ошибку: [DCC Error] DllUnit1.pas (7): E2273 нет перегруженной версии MyFunc с этим списком параметров существует .

В справке Delphi я вижу:

"Delphi Language Reference"/"The exports clause"

...

When you export an overloaded function or procedure from a dynamically loadable library, you must specify its parameter list in the exports clause. For example,



exports

 Divide(X, Y: Integer) name 'Divide_Ints',

 Divide(X, Y: Real) name 'Divide_Reals';



On Windows, do not include index specifiers in entries for overloaded routines.

Вопросы:

1. 
   

   Как правильно экспортировать эти функции в модуль DllUnit1 и можно ли вообще сделать это в Delphi (экспорт под одним именем), чтобы получить тот же вызов из моего проекта TestMyDll, что и в начале (пример из windows.па)?



2. 
   

   Если такие функции можно экспортировать под одним именем, то правильно ли будет работать вызовом DLL с других языков (VB, C ++)? Или лучше сделать две функции с разными именами?

P.S. Немного похожий вопрос нашел здесь (http://stackoverflow.com/questions/6257013/how-to-combine-overload-and-stdcall-in-delphi), но ответ меня не устроил

P. S. S. плохой английский

Добавить (добавил После ответов)

Ясно, спасибо.

Сделал так:

В проекте:

Function MyFunc (const X:Integer):string; StdCall; External 'MyDll.dll' Name 'MyFunc'; Overload;

Function MyFunc (const X:Extended):string; StdCall; External 'MyDll.dll' Name ' MyFunc1'; Overload;

В DllUnit1

Exports

MyFunc (const X:Integer) Name 'MyFunc',

MyFunc (const X:Extended) Name 'MyFunc1';

Он составлен и работать нормально.

Еще вопросы:

1. 
   

   Вроде работает, но правильно ли?



2. 
   

   Имеет ли значение как написать " Function MyFunc (const X: Integer): string; Overload; StdCall;" или "Function MyFunc (const X:Integer): string; StdCall; Overload;"?



3. 
   

   Правильно ли будут вызваны эти функции в проекте других языков (Vb, C ++, C #)?