AddressOf
cs_MMA
Messages postés
2
Date d'inscription
mercredi 16 avril 2003
Statut
Membre
Dernière intervention
17 avril 2003
-
16 avril 2003 à 18:52
spy_EIT Messages postés 19 Date d'inscription mardi 6 juillet 2004 Statut Membre Dernière intervention 9 novembre 2007 - 11 oct. 2007 à 10:05
spy_EIT Messages postés 19 Date d'inscription mardi 6 juillet 2004 Statut Membre Dernière intervention 9 novembre 2007 - 11 oct. 2007 à 10:05
1 réponse
spy_EIT
Messages postés
19
Date d'inscription
mardi 6 juillet 2004
Statut
Membre
Dernière intervention
9 novembre 2007
11 oct. 2007 à 10:05
11 oct. 2007 à 10:05
Salut MMA,
en .NET, il faut d'abord déléguer le prototype de ta fonction de Callback, et ensuite déclarer DDEInitialize avec le type délégué comme pointeur vers cette fonction.
En clair:
1) Déléguer le prototype de la fonction de Callback (avec un autre nom, par esemple rajoute "Delegate"):
Public
Delegate
Function DDECallbackDelegate(
ByVal uType
As
Long,
ByVal uFmt
As
Long,
ByVal hConv
As
Long,
ByVal hszString1
As
Long,
ByVal hszString2
As
Long,
ByVal hData
As
Long,
ByVal dwData1
As
Long,
ByVal dwData2
As
Long)
As
Integer
2) Déclarer un type 'DDECallbackDelegate' comme pointeur de fonction:
Public
Declare
FunctionDdeInitialize
Lib
"user32"
Alias
"DdeInitializeA" (
ByValpidInst
As
Long,
ByValpfnCallback
AsDDECallbackDelegate
</gras>ByValafCmd
As
Long,
ByValulRes
As
Long)
As
Interger
3) Appeler DDEInitializeA avec Address Of:
DdeInitialize(g_lInstID, AddressOf
DDECallback, APPCMD_CLIENTONLY
Or MF_SENDMSGS
Or MF_POSTMSGS, 0)
Ca passe comme ça..... Par contre ensuite, moi j'ai un problème de violation d'accès mémoire.... donc je peux pas te dire si c'est complètement fonctionnel, ou si il y a encore un p'tit truc qui coince... (je suis entrain d'essayer de changer les types du prototype de DDAInitializeA, car il y a des incomptatibilités entre VB6 et .NET... évidemment )
Bon courage !
en .NET, il faut d'abord déléguer le prototype de ta fonction de Callback, et ensuite déclarer DDEInitialize avec le type délégué comme pointeur vers cette fonction.
En clair:
1) Déléguer le prototype de la fonction de Callback (avec un autre nom, par esemple rajoute "Delegate"):
Public
Delegate
Function DDECallbackDelegate(
ByVal uType
As
Long,
ByVal uFmt
As
Long,
ByVal hConv
As
Long,
ByVal hszString1
As
Long,
ByVal hszString2
As
Long,
ByVal hData
As
Long,
ByVal dwData1
As
Long,
ByVal dwData2
As
Long)
As
Integer
2) Déclarer un type 'DDECallbackDelegate' comme pointeur de fonction:
Public
Declare
FunctionDdeInitialize
Lib
"user32"
Alias
"DdeInitializeA" (
ByValpidInst
As
Long,
ByValpfnCallback
AsDDECallbackDelegate
</gras>ByValafCmd
As
Long,
ByValulRes
As
Long)
As
Interger
3) Appeler DDEInitializeA avec Address Of:
DdeInitialize(g_lInstID, AddressOf
DDECallback, APPCMD_CLIENTONLY
Or MF_SENDMSGS
Or MF_POSTMSGS, 0)
Ca passe comme ça..... Par contre ensuite, moi j'ai un problème de violation d'accès mémoire.... donc je peux pas te dire si c'est complètement fonctionnel, ou si il y a encore un p'tit truc qui coince... (je suis entrain d'essayer de changer les types du prototype de DDAInitializeA, car il y a des incomptatibilités entre VB6 et .NET... évidemment )
Bon courage !
