[Builder 5] Comment utiliser des fonctions d'une DLL (Delphi) ?

Je développe principalement en Delphi. Mais, j'ai été amené à créer une DLL.
J'essais de me rappeller mes lointains souvenir de C++, pour faire un petit exe qui fera appel aux fonction de ma DLL. Le but est de s'assurer que ma DLL peut être appellée depuis n'importe quel langage.

Je suis sous C++Builder 5 Pro, et je coince dès le début pour inclure ma DLL à mon projet. Je pensais qu'un simple #include "MaDLL.dll" suffirait, mais apparemment non.
J'ai fait une petite recherche dans la FAQ, mais rien sur les DLL.
J'ai bien trouvé ce post (http://www.developpez.net/forums/sho...&highlight=dll), mais quand j'essais d'inclure le *.lib généré, j'ai les mêmes erreurs que pour la DLL :

Citation:

---

Caractère 'ÿ' (0x0) incorrect
Caractère '@' (0x0) incorrect
...

---

Si quelqu'un pouvait m'indiquer la marche à suivre ...
Merci d'avance.

:hola:

Il faut inclure le ou les en-têtes (.) contenant les déclarations des fonctions / classes de ta bibliothèque.
Il faut ajouter le fichier bibliothèque (.lib) dans les options de l'éditeur de liens.

Citation:

---

Envoyé par Laurent Gomila

Il faut inclure le ou les en-têtes (.) contenant les déclarations des fonctions / classes de ta bibliothèque.

---

C'est à dire ? :koi:
Je n'ai plus fait de C++ depuis 2002. :aie:

Citation:

---

Envoyé par Laurent Gomila

Il faut ajouter le fichier bibliothèque (.lib) dans les options de l'éditeur de liens.

---

Ca ne change rien. J'ai les mêmes erreurs.

Hmm... Est-ce que tu as des en-têtes (.h) qui vont avec ta bibliothèque ? Si ce n'est pas le cas il faudra procéder autrement (charger la DLL dynamiquement).

Citation:

---

Envoyé par Laurent Gomila

Hmm... Est-ce que tu as des en-têtes (.h) qui vont avec ta bibliothèque ?

---

Non. Ca n'existe pas en Delphi. Ca doit être propre au C++.

Citation:

---

Envoyé par Laurent Gomila

Si ce n'est pas le cas il faudra procéder autrement (charger la DLL dynamiquement).

---

Bon, j'ai essayé :
- Dans le *.h :

Code:

---

1 2	typedef void (WINAPI *DLL_InitDemandeExtDLL) (int HandleApp, Pointer pSession, PChar sSociete, PChar sSite, PChar sLibelleAtelier, PChar sUtilisateur); typedef LongBool (WINAPI *DLL_AffDemandeExt) (int Mode, PChar sNumDemande, int nQuantite, Pointer pInfoDemande);

---

- Dans le *.cpp :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27

HMODULE hDLL = LoadLibrary("DemandeExt.dll"); if(!hDLL) { ShowMessage("Erreur : LoadLibrary !"); return; }   DLL_InitDemandeExtDLL pfn_InitDemandeExtDLL; DLL_AffDemandeExt pfn_AffDemandeExt;   pfn_InitDemandeExtDLL = (DLL_InitDemandeExtDLL)GetProcAddress(hDLL, "InitDemandeExtDLL"); if(!pfn_InitDemandeExtDLL) { ShowMessage("Erreur : GetProcAdress InitDemandeExtDLL !"); return; } pfn_AffDemandeExt = (DLL_AffDemandeExt)GetProcAddress(hDLL, "AffDemandeExt"); if(!pfn_AffDemandeExt) { ShowMessage("Erreur : GetProcAdress AffDemandeExt !"); return; }   pfn_InitDemandeExtDLL(0, &Session, "", "", "", ""); pfn_AffDemandeExt(1, "", 1, NULL);   FreeLibrary(hDLL);

---

J'ai encore des erreurs, mais à l'exécution. Je pense que ça viens de ma DLL, qui ne respecte pas les standards Windows (trop pure Delphi).
Est-ce que le code semble juste (du point de vue du C++) ?

Salut,
J'ai déjà fait une telle chose (appeler une dll delphi depuis un programme C++)

Tu dois tou d'abord éviter les type string dans delphi et utiliser plutot le type PChar, en plus dans C++ tu dois déclarer un pointeur sur type de la fonction qui a la meme signature que celle que t'as en delphi, la charger et enfin l'appeler.

Citation:

---

Envoyé par bouzaidi

Tu dois tou d'abord éviter les type string dans delphi et utiliser plutot le type PChar

---

Effectivement. Je l'avais lu aussi. J'y ai fait attention.
Par contre, pour les entiers et les booléens, quels sont les types possibles à utiliser ?

Voici les prototypes en Delphi :

Code:

---

1 2	procedure InitDemandeExtDLL(HandleApp: HWND; pSession: Pointer; const sSociete, sSite, sLibelleAtelier, sUtilisateur: PChar); stdcall; function AffDemandeExt(Mode: TMode; sNumDemande: PChar; nQuantite: Longint; pInfoDmd: PInfoDemande = nil): LongBool; stdcall;

---

Citation:

---

Envoyé par bouzaidi

en plus dans C++ tu dois déclarer un pointeur sur type de la fonction qui a la meme signature que celle que t'as en delphi, la charger et enfin l'appeler.

---

C'est pas ce que j'ai essayé de faire dans le code posté au-dessus (http://www.developpez.net/forums/sho...61&postcount=5) ?
J'ai oublié des choses ?

Citation:

---

C'est pas ce que j'ai essayé de faire dans le code posté au-dessus (http://www.developpez.net/forums/sho...61&postcount=5) ?
J'ai oublié des choses ?

---

Non c'est bon, ton code C++ a l'air correct. Je pense qu'il ne te reste plus qu'à trouver les types qui sont compatibles avec les deux langages.

Citation:

---

Envoyé par Laurent Gomila

Non c'est bon, ton code C++ a l'air correct. Je pense qu'il ne te reste plus qu'à trouver les types qui sont compatibles avec les deux langages.

---

Ok. :merci:

J'ai plus qu'à creuser du côté de ma DLL ... :bug:
Si quelqu'un a des infos sur les types à utiliser, je prends.

;)

A mon avis ton probleme c'est l'incompatibilité de type. tu peux regarder si tu peux rendre dans le prototype delphi que des types int et pchar et boolean (c est a dire que tu dois eviter tous ce qui est TMode et THandle). Moi perso c est les seul type que j'ai utilisé en delphi je n'ai meme pas utilisé le type Pointer mais je crois il sera standarisé avec C++ aussi. Mais je suis a peu pres sur et certain qu'il s'agit d'une inadaptation de type.

voila ce lien qui pourra t'aider peut etre, c est quand je resolvais mon appel C++ a la DLL Delphi.
http://www.developpez.net/forums/sho...d.php?t=325339

Sinon pourkoi tu n'utilise pas de char* en C++!!!

Citation:

---

Envoyé par bouzaidi

(c est a dire que tu dois eviter tous ce qui est TMode et THandle).

---

Je vais remplacer le TMode par un entier.
Mais, le HWND, c'est pas standard Windows ?

Citation:

---

Envoyé par bouzaidi

Sinon pourkoi tu n'utilise pas de char* en C++!!!

---

Parce que je ne sais pas les utiliser. :oops:
J'ai du mal avec les pointeurs (surtout en C++).

personnelement avec char* je n'ai pas trouvé de probleme pour le passage de delphi à C++. T'as qu'à declarer char* au lieu de PChar et tou le reste c est pareil... tu file une chaine de caratctere en parametre tres classiquement..
Remplace Tmode en int pour voir ce ke ca va donner??

Citation:

---

Envoyé par bouzaidi

personnelement avec char* je n'ai pas trouvé de probleme pour le passage de delphi à C++. T'as qu'à declarer char* au lieu de PChar et tou le reste c est pareil... tu file une chaine de caratctere en parametre tres classiquement..
Remplace Tmode en int pour voir ce ke ca va donner??

---

Ca fonctionne pour le PChar :arrow: Char* et pour le (TMode)LongInt :arrow: Long. :mrgreen:

Code:

---

function AffDemandeExt(nMode: LongInt; sNumDemande: PChar; nQuantite: Longint; pInfoDmd: PInfoDemande = nil): LongBool; stdcall;

---

Code:

---

typedef LongBool _stdcall (WINAPI *DLL_AffDemandeExt) (long Mode, Char* sNumDemande, long nQuantite, ????????);

---

Il ne reste plus qu'à trouver comment passer un pointeur sur une structure.
Comment faire ?

:hola:

Le pointeur sur quelque chose, c'est bien le void* ?
On a bien le droit de passer NULL à ce genre de paramètre ?

:mur:

En effet, void* peut être un pointeur sur n'importe quoi, et on a droit de le mettre à NULL.
D'un autre côté, j'ignore si les pointeurs/références Delphi sont de simples pointeurs, ou s'il y a plus compliqué (comptage de références, etc.).

Et aussi, tu dois retirer le mot _stdcall dans le typedef: C'est déjà compris dans WINAPI (un bète #define WINAPI __stdcall), et il n'est pas à la bonne place dans la ligne (seul WINAPI l'est).

Citation:

---

Envoyé par Médinoc

En effet, void* peut être un pointeur sur n'importe quoi, et on a droit de le mettre à NULL.
D'un autre côté, j'ignore si les pointeurs/références Delphi sont de simples pointeurs, ou s'il y a plus compliqué (comptage de références, etc.).

---

J'ai essayé aussi l'instruction Pointer qui a l'air d'exister aussi en C++, mais ça ne marche pas mieux que void*
:pleure:

Citation:

---

Envoyé par Médinoc

Et aussi, tu dois retirer le mot _stdcall dans le typedef: C'est déjà compris dans WINAPI (un bète #define WINAPI __stdcall), et il n'est pas à la bonne place dans la ligne (seul WINAPI l'est).

---

Comme ça, c'est bon ?

Code:

---

1 2	typedef void (WINAPI *DLL_InitDemandeExtDLL) (long HandleApp, void* pSession, Char* sSociete, Char* sSite, Char* sLibelleAtelier, Char* sUtilisateur); typedef LongBool (WINAPI *DLL_AffDemandeExt) (long Mode, Char* sNumDemande, long nQuantite, void* pInfoDmd);

---

Oui, là, ça a l'air bon.

Citation:

---

Envoyé par Médinoc

Oui, là, ça a l'air bon.

---

Et pourtant, j'ai une violation d'accès à l'exécution de la deuxième (à cause du paramètre pointeur).
Y a t'il d'autres choses auxquelles il faut penser ?