Discussion :

[woully]

Bonsoir,

j'ai un serieux problème avec une fonction d'une activeX...

mon progamme Delphi doit appeler la fonction Sendmessage(var hMsg :byte). Cette fonction fait partie d'une activeX développée en C++.

Or la syntaxe de cette Fonction est la suivante :
Sendmessage(ByRef unsigned char hMsg)

Mon probleme est que hmsg est un pointeur sur un array of byte. Or delphi n'aime pas du tout le passage de pointeur en Var.
La compilation m'informe que les paramètres var doivent coincider avec les paramètres passés à la fonction...

Comment puis je résoudre ce problème ????

[tourlourou]

essaye

Code :

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

1
2
3
4
 
Sendmessage(MyArrayOfByte[0]); 
//ou
Sendmessage(@MyArrayOfByte[0]);

[woully]

Salut,

j'avais déjà essayé les 2 solutions..
Dans le premier cas, la compilation bute sur le même message d'erreur.
Le deuxieme cas est accepté. Cependant, le paramètre transmit est le contenu de l'array[0], et non le pointeur sur l'array...

De plus les pointeurs en delphi sont codés sir 3 ou 4 bytes..alors que ma finction n'attends qu'un seul byte !!!

Je commence à désespérer

[veloce]

peut etre comme ça :

var MyArrayOfByte: array[0..ceQueTuVeux] of char;
Sendmessage(MyArrayOfByte);

[woully]

Malheureusement non plus.

c'est bizarre. j'ai développé rapidement un petit programme sous Visual basic. VB (qui reste quand même rudimentaire par rapport à Delphi), n'a aucun problème avec ce paramètre.

ex :
Dim nArray() as Byte

[...] //Copy des données dans l'Array.
SendMessage(nArray(0))

Et cela fonctionne parfaitement...