Discussion :

[declencher]

Bonjour,

J'aimerai utilisé sous delphi une dll écrite en c++.

La première fonction ne m'a pas posé de problème car elle ne prennait aucun paramètre. La deuxième à de nombreux paramètres : une chaine de caractère que j'ai écrit en dur pour les tests, 1 float que j'ai remplacé par 1 single, et surtout, un tableau !

En fait la fonction à un paramètre du type :

Code :

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

SAFEARRAY **MonTableau

J'ai donc tenté de passer en paramètre un tableau dont j'ai fixé la taille arbitrairement :

Code :

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

MonTableau : array[0..1000000] of MonType

MonType est un record que j'ai déclaré car on m'a donné sa structure en C (1 single, et un tableau de 4 char).

Vous vous en doutez, je plante à l'exécution...

Je coince, et j'ai l'impression que ce tableau est le seul élément qui me gêne...

Pour info, la dll est utiliser sans problème par un programme VB.

Vous avez une idée ?

[ShaiLeTroll]

float et single, c'est 4 octets, c'est compatible, OK
Ce n'est plutôt SAFEARRAY c'est une type particulier, il utilise la Mémoire COM pour s'allouer, il faut utiliser SafeArrayCreate sur un PVarArray\PSafeArray qui s'utilisent globament comme VarArrayCreate sur un Variants

Attention, une variable locale est limitée, un si grand tableau peut poser des problèmes de taille de pile ! max 1Mo souvent par défaut !
Utilise un Tableau dynamique et SetLength !
D'ailleurs pourquoi allouer autant ?

[declencher]

Bonjour,

J'ai mis un peu de temps à répondre car je souhaitais d'abord me documenter. Et finalement je ne trouve pas de réponse à mes questions.

Est ce normal qu'en C et en delphi il faille passer par cette structure complexe, alors qu'en VB il suffit de passer en paramètre un tableau d'élément dont je connais la structure ? Et surtout, comment c'est 2 façon d'appeller la fonction peuvent être compatible ? Entre le safearray et le tableau de record que j'ai tenté de créer via Delphi (copiant VB) il y a quand une sacré différence. Je suis un peu perdu là...

Je vais réduire la taille du tableau, j'avais tenté 20000 et 1000000 car je ne savais pas combien d'élément la fonction allait me renvoyer. L'objectif est de récupérer les points d'un fichier dxf, et je ne connais pas le contenu du fichier de test que j'utilise

[Paul TOTH]

Bonjour,

J'ai mis un peu de temps à répondre car je souhaitais d'abord me documenter. Et finalement je ne trouve pas de réponse à mes questions.

Est ce normal qu'en C et en delphi il faille passer par cette structure complexe, alors qu'en VB il suffit de passer en paramètre un tableau d'élément dont je connais la structure ? Et surtout, comment c'est 2 façon d'appeller la fonction peuvent être compatible ? Entre le safearray et le tableau de record que j'ai tenté de créer via Delphi (copiant VB) il y a quand une sacré différence. Je suis un peu perdu là...

Je vais réduire la taille du tableau, j'avais tenté 20000 et 1000000 car je ne savais pas combien d'élément la fonction allait me renvoyer. L'objectif est de récupérer les points d'un fichier dxf, et je ne connais pas le contenu du fichier de test que j'utilise

il est douteux que la taille ne soit pas connue ou qu'il ne soit pas possible de la déterminer.

ceci dit "**" dans la déclaration indique que c'est un pointeur sur un pointeur (@@ ou ^^ selon le cas sous Delphi).

il est probable que sous Delphi cela donne un (var p:Pointer), c'est à dire que c'est C++ qui te retourne l'adresse d'un pointeur vers des données. Dans ton cas (var p:PSafeArray);.

Note que C++ ne fait pas de distinction entre tableaux et pointeurs, un char[] et un char* c'est comme sous Delphi un PChar qui peut être utilisé comme un pointeur sur un char (p^) ou un pointeur sur un tableau de char (p[x]). Sauf qu'en C++ c'est vrai pour tous les types alors que sous Delphi ça ne l'est que pour le PChar.

[declencher]

Merci pour ce complément d'info.

Seul la dll peut déterminer la taille du tableau qu'elle renvoie, car elle seule s'est lire ce format de fichier.

Après quelques recherches, je commence à comprendre pourquoi sous VB c'est plus simple. Du coup je me concentre sur Delphi, mais je ne trouve que des exemples super complexe.

Concernant ça

Code :

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

(var p:PSafeArray);

j'en étais arrivé à la même conclusion. Il me reste à voir comment déclarer ma variable qui sera en fait un pointeur sur pointeur, et surtout comment exploiter ensuite les données qui auront été insérées par la fonction car je vais devoir mapper les données avec ma structure préalablement déclaré dans delphi...

[Paul TOTH]

ceci dit, tu ne nous donnes aucune info sur le contexte, ni le code VB qui est supposé fonctionner, alors nous ne pouvons faire que des suppositions.