Discussion :

[LuluTchab]

Salut !

ben comme c'est écrit dans le sujet, j'ai des problèmes pour récupérer le résultat qui est renvoyé par la fonction contenue dans la DLL.

J'ai déclaré un type pointeur sur les strings

Code :

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

PString = ^String;

et quand j'appelle ma fonction en affectant le résultat à une variable de type PString, ça fonctionne nickel.

Le hic, c'est dès que je veux afficher la chaine de caractère que ça ne va plus.

Code :

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

ShowMessage(maVarPointeur^);

A ce moment-là, j'ai une exception EAccessViolation ...

comment est-ce que je peux faire ??

merci

[Nono40]

Déjà si tu utilises une dll écrite en C ou C++ oublie le type String, car c'est un type seulement utilisé en Pascal et totalement incompatible avec le PChar.

Donne-nous la déclaration de la fonction en C ( et non pas sa traduction en Pascal ), et donne aussi la déclaration que tu as fait dans Delphi. On pourra alors te dire ce qui ne va pas...

[LuluTchab]

ok.. voilà les déclarations des fonctions

C++

Code :

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

char* __stdcall lireVal(LPWSTR lp);

Delphi

Code :

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

1
2
3
4
function lireLPWSTR(LPWSTR : Integer): PString; stdcall;
 
implementation
function lireLPWSTR; external 'utilsLPWSTR.dll' name 'lireVal';

[Nono40]

Il y a plusieurs erreurs dans ta traduction :

en C on met le type avant la variable, par exemple avec Delphi :

Code :

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

UnEntier:Integer;

Est écrit en C

Code :

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

Int UnEntier

donc ce n'est pas LPWSTR le paramètre mais lp.

ensuite LPWSTR n'est pas un type entier mais un type pointeur vers une chaine WideString mais à zéro terminal.

Le résultat de la fonction est une chaine certe, mais en C les chaines sont toujours à zéro terminal. Char* est un pointeur vers un caractère, avec Delphi c'est un PChar qu'il faut utiliser.

Code :

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

function lireLPWSTR(lp : LPWSTR): PChar; stdcall;

[LuluTchab]

C bon, ça marche !! MERCI!

PS:

Je savais pas que le type LPWSTR existait aussi en Delphi.