importation de dll sous VB 6.0

Question

Bonjour,

j'ai besoin de connaitre la façon d'incorporer une fonction issue d'une DLL avec un passage par valeur pour un type défini par l'utilisateur.
En effet je dois intégrer sous VB une fonction du type :
short

 _Ic_InitChip( HANDLE hdrv,t_CANbusParams busParams, unsigned long adressing, unsigned long padding);
ou la structure t_CANbus Params  ets définie comme suit :
typedef

struct{

unsigned
char baudpresc; 
// Baud Rate Prescaler

unsigned
char tseg1; 
// TSEG1

unsigned
char tseg2; 
// TSEG2

unsigned
char sjw; 
// Synchronization Jump Width

unsigned
char sample; 
// Sampling mode} t_CANbusParams;

j'ai converti cela en VB de la façon suivante :

Type udtCANbusParams
    baudpresc As Byte  ' Baud Rate Prescaler
    tseg1 As Byte      ' TSEG1
    tseg2 As Byte      ' TSEG2
    sjw As Byte        ' Synchronization Jump Width
    sample As Byte     ' Sampling mode
End Type

Declare Function Ic_InitChip Lib "xxx.dll" Alias "_Ic_InitChip" (ByVal hdrv As Long, ByVal busParams As udtCANbusParams, ByVal adressing As Long, padding As Long) As Integer

Mais cela ne fonctionne pas....

quelle est la bonne déclaration ??

Merci d'avance pour votre aide.

BruNews · Answer

Manque deja le ByVal pour padding.

Aucune idée pour passage struct depuis VB.
Tu es certain que ce n'est pas l'adresse de la struct qui est demandée:
_Ic_InitChip( HANDLE hdrv,t_CANbusParams *busParams, ....) ???

ciao...
BruNews, MVP VC++

Bojczuk · Answer

Oui hélas je suis certain que ce n'est pas l'adresse, car dans ce cas je sais comment faire...

mury · Answer

Et depuis le 2 mai 2006, as-tu trouvé une solution ? J'ai le même problème avec la même fonction... merci

Importation de dll sous VB 6.0

3 réponses

Discussions similaires