Discussion :

[NGeVtC87]

Bonjour,

Je développe sous Delphi 2005, un petit programme qui fait appel à une fonction simple d'addition de deux entier cette fonction est définit dans une DLL codé en C++ dont le code (.h) est le suivant

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
 
#ifdef MATHFUNCSDLL_EXPORTS
#define MATHFUNCSDLL_API __declspec(dllexport) 
#else
#define MATHFUNCSDLL_API __declspec(dllimport) 
#endif
 
namespace MathFuncs
{
    // This class is exported from the MathFuncsDll.dll
    class MyMathFuncs
    {
    public: 
        // Returns a + b
        static MATHFUNCSDLL_API int  Add(int a, int b); 
}

La DLL est généré sous Visual Studion et marche très bien quand l'appel se fait d'un programme C++.

J'essaye de faire l'appel avec un programme Delphi qui le suivant

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
 
implementation
 
{$R *.dfm}
function Add(A, B: integer): integer; stdcall; external 'MathTest.dll' name 'Add';
 
 
procedure TForm1.Button1Click(Sender: TObject);
var
  temp : integer;
begin
 
   temp := Add(2,5) ;
end;

A l'exécution j'ai le message d'erreur "Le point d'entrée de procédure Add est introuvable la bibliothèque de lien dynamique MathTest.dll"

Est ce qu'il y aurait quelqu'un qui pourrait m'aider à identifier mon erreur

Merci

[Paul TOTH]

c'est normal, la fonction n'est pas exportée sous le nom "Add", n'importe quel outils d'analyse de DLL le montrera, comme DID32 par exemple

[NGeVtC87]

Merci, mais j'ai essayé sans définir le nom "Add"

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 function Add(A, B: integer): integer; stdcall; external 'MathTest.dll'

et le message d'erreur est le même

Merci

[phoenixgreg]

Regardes déjà avec un programme comme Dependency Walker sous quel nom est exportée ta fonction. Fait attention à la "décoration", tu peux regarder au niveau de la déclaration "extern c".

[ShaiLeTroll]

C'est surtout que c'est une méthode d'une classe, comme elle static, peut-être qu'elle est visible de l'extérieur
Peu de langage soit capable d'importer une classe C++, seulement des fonctions isolées pour Delphi en tout cas

le nom risque d'être un truc tordue genre _ZN9MathFuncs11MyMathFuncs3Add$8 voir Mangled Names

Utilise ...\Embarcadero\RAD Studio\x.0\bin\TDUMP.exe pour trouver le nom réel
Si tu n'es pas fan de la ligne de commande, DependecyWalker comme le propose phoenixgreg fonctionne très bien

[Andnotor]

Ou une fois le programme lancé en mode debug, menu Voir -> Fenêtres de debugage -> Modules (ou Ctrl+Alt+M) et cliquer sur la dll.

[NGeVtC87]

Bonjour,

J'ai utilisé Dependency Walker le nom de la fonction add qu'il me retourne est "?Add@MyMathFuncs@MathFuncs@@SGHHH@Z". J'ai modifié mon code d'appel Delphi:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 function Add(A, B: integer): integer; stdcall; external 'MathTest.dll' name '?Add@MyMathFuncs@MathFuncs@@SGHHH@Z';

mais le message d’erreur est toujours le même

Merci