Discussion :

[Plantex]

Bonjour,

J'ai récupéré une DLL écrite en C++ qui met à ma disposition une fonction qui, à partir d'un chaine de caractères, mouline et m'en ressort une autre.
J'aimerais l'utiliser (en codant sous delphi).

Je la charge donc de manière statique (pas gênant dans mon cas).

La fonction que j'appelle est définie comme suit en C++ :

Code :

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

bool CalculCATChecksum(char* sCATPayLoad, char* sCATCheckSum);

Elle demande donc, en entrée, un pointeur sur une chaine de caractères, et une autre qui sert en réalité de sortie.

Je tente donc de lui passer ma chaine de caractères définie à partir du pascal en faisant un PChar, que je passe à la fonction. De même pour le 2ème argument, qui est la sortie.

L'appel de la fonction dans la DLL se passe mal : j'ai droit à une erreur de violation d'accès mémoire... (EAccessViolation) :
'Violation d'accès à l'adresse 10001405 dans le module 'maDLL.dll'. Ecriture de l'adresse 004572AC'

J'ai essayer de lui passer un pointeur sur un String que j'ai créé moi même : même résultat.

Auriez vous une idée de la méthode à utiliser pour résoudre ce problème?

Merci d'avance

[M.Dlb]

Il n'y aurait pas un problème de pointeur dans ta procédure en C++ ? Ce genre d'erreur vient généralement d'une mauvaise désallocation ou d'un déréférencement pas correct...

[Plantex]

En fait, la DLL en C++ m'a été fournie compilée donc pas vraiment moyen de savoir. Le truc c'est que quand cette DLL est utilisée depuis un programme C++, ça ne pose aucun problème donc je me dis que ça vient de moi :/

[Alcatîz]

Bonjour !

Peut-on voir un extrait du code d'appel ?
Quelle est la convention d'appel de la fonction ? _CDECL, _STDCALL, _FASTCALL, _PASCAL ?

[M.Dlb]

En fait, la DLL en C++ m'a été fournie compilée donc pas vraiment moyen de savoir. Le truc c'est que quand cette DLL est utilisée depuis un programme C++, ça ne pose aucun problème donc je me dis que ça vient de moi :/

Le C/C++ est un peu plus permessif que le Pascal Il est possible que le code C++ soit correct mais laisse un "vide", que L'application faite en Delphi n'accepte pas...

Montre nous le code, comme l'a suggéré Alcatîz

[Plantex]

voilà le code concernant l'appel de la fonction

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
function CalculCATChecksum(sCATPayLoad, sCATChecksum: PChar ): boolean; stdcall; external 'CalculCATChecksum.dll';
...
 
 
procedure TForm1.Button3Click(Sender: TObject);
var
        entree, sortie : String;
        Pentree,Psortie : PChar;
        bool : boolean;
 
begin
        entree := 'azert';
        sortie := #0#0;
        entree[6] := #0;
 
 
        Pentree := PChar(entree);
        Psortie := PChar(sortie);
 
 
 
 
        bool := CalculCATChecksum(Pentree, Psortie);
        Edit2.Text := IntToStr(toto);
end;

j'espère que ça aide, mais j'en suis pas sûr.

Merci en tout cas !

[Alcatîz]

Es-tu sûr de la convention d'appel stdcall ? Cela ne coûterait rien d'essayer la convention standard cdecl.
Je n'ai pas d'autre idée pour l'instant