Discussion :

[etranger]

Bonjour

J'ai un petit probleme avec l'utilisation d'une DLL que j'ai ecrit moi meme en C.

Voila la declaration de ma fonction Cdans la DLL :

Code :

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

 DLLIMPORT void ma_procedure(char *name,char *clef);

et voila la maniere dont j'utilise cette fonction dans mon programe Delphi:

Code :

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

1
2
3
4
5
6
procedure ma_procedure(name,clef : PChar);stdcall ;external 'DLL1.dll';
....
....
         clef:=PChar(MaskEdit1.text);
         name:='mm.txt';
          ma_procedure(name,clef );

J'optient une erreur : "EStackOverFlow" lors de lexecution.
J'ai debuger mon programe (OllyDBG) pour voir ce qui ce passe. La procedure ce deroule normalement et c'est qu'apres que la procedure se soit terminé qu'il y a cette erreur.
Comme j'ai douter que sa venait d'un probleme de memoir avec les parametres de la fonction, j'ai enlever les parametres (dans la DLL et l'exe) et l'erreur disparet.
J'ai essayer de passer les parametres de la procedure par valeur :

Code :

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

DLLIMPORT void ma_procedure(char name[200],char clef[100]);

mais rien ne change .
Le probleme vient donc peut etre du fait qu'une foit que la procedure est terminee, les variable sont detruites, et ces variable appartienne au programe principal (je ne suis pas sure ).
J'ai trouver quelques solution pour la getion de la memoire mais avec des DLL ecrite en Delphi (BORLNDMM.DLL) mais je ne voit pas quoi faire pour mon probleme

Merci d'avance .

[Reisubar]

Pourquoi la procédure n'est elle directement pas appellée avec les PChars qui vont bien, à savoir directement :

Code :

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

ma_procedure(PChar(Name), PChar(MaskEdit1.text));

Ensuite, il faut garder à l'esprit que PChar(UnString) convertir la variable de type string en une zone exploitable comme un PChar() par l'application mais tout de même gérée par Delphi. C'est à dire en gros que tu ne peux exploiter le résultat de cette conversion qu'en lecture dans ta DLL. Sinon, il faut passer par un "vrai" tableau de caractères :

Code :

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

1
2
3
4
5
6
var
  LBuffer: array [0..100] of char;
begin
  StrPLCopy(LBuffer, MaskEdit1.Text, SizeOf(LBuffer);
  ma_procedure(nil, @LBuffer);
end;

Je n'ai dans l'exemple de code ci-dessus traité que le cas de la seconde variable, si la première doit elle aussi être modifiée côté DLL, il faudra lui appliquer une technique similaire.

Enfin, une fois pour toutes : si tu gères bien le passage des PChars, c'est à dire en gros que si tu ne fais pas n'importe quoi avec, premièrement, ca ne plante pas, ensuite il est inutile d'utiliser la DLL de Borland dans ton projet !!

[etranger]

Enfin sa fonctione avec les array de char, Merci beaucoup.

Pourtant je ne comprend pas pourquoi sa fonctionait pas avant, puisque les chaine etait juste lues mais pas manipuler

Mais bon l'important c'est que sa marche

Encor merci .