Bonjours, voici mon problème :
Quelqu'un m'a fournis une DLL programmée en pascal et il m'est impossible de la référence dans la base de registre de windows en utilisant la fonction Regsvr32.
J'obtiens le message d'erreur suivant :
Hors avec son executable les appels à la dll fonctionnent très bien !Load Librairy a échoué. une routine d'initialisation d'un librairie dynamique (dll) a échoué
La structure du fichier source de la DLL respecte le schéma suivant :
Merci d'avance à ceux qui pourront m'aider à rendre cette DLL compatible avec windows afin de pouvoir l'utiliser dans d'autres langage qu'en pascal.
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
18
19
20
21
22
23
24
25 library trench; {le nom de notre dll} Uses crt,Windows; function passage(p1,p2 :pchar):boolean; stdcall; { La fonction que l'on veut exporter } var Param1,Param2:string; ok:boolean; begin { debut } Param1 := StrPas(p1); Param2 := StrPas(p2); ok := false; if (Param1=Param2) then begin ok := true; end; result := ok ; { le resultat sous forme de booleen} end ; { fin de la fonction } Exports { la partie qui stipule les exports } passage; begin { code au chargement de la dll, ici rien... } end.
Partager