Re: Utilisation de DotNetDélégué
Posté par GoZeub le 1/7/2008 16:47:59
M'inspirant de votre développement, j'ai voulu tester les fonctionnalités .Net en utilisant Message Queuing.
J'ai donc créé mon projet, intégré l'assemblage System.Messaging,créé mon code qui ne possède aucune erreur de compilation en 64 bits.
Mais voila j'ai un gros problème Windev ne veut pas me créer d'exécutable et plante à chaque tentative... Impossible donc pour moi de tester ce petit bout de programme que je me permet de partager avec vous.
Dans un bouton:
Et la procédure :
Avez vous une quelconque idée de ce qui peut se passer ? Mon code est-il incohérent ?
Cordialement
J'ai donc créé mon projet, intégré l'assemblage System.Messaging,créé mon code qui ne possède aucune erreur de compilation en 64 bits.
Mais voila j'ai un gros problème Windev ne veut pas me créer d'exécutable et plante à chaque tentative... Impossible donc pour moi de tester ce petit bout de programme que je me permet de partager avec vous.
Dans un bouton:
QueueLecture est une chaîne="FormatName:Direct=TCP:192.168.0.5\private$\test2"
pclMyQueue est un objet MessageQueue dynamique=allouer un MessageQueue(QueueLecture)
pclMyQueue:add_ReceiveCompleted(DotNetDélégué(MyReceiveCompleted,"MessageQueue"))
pclMyQueue:BeginReceive()
Et la procédure :
PROCEDURE MyReceiveCompleted(source,args)
mq est un objet MessageQueue dynamique
m est un objet Message dynamique
// Connect to the queue.
mq = source
// End the asynchronous Receive operation.
m = mq:EndReceive(args.AsyncResult)
// Display message information on the screen.
Info("Message: " + m:Body)
// Restart the asynchronous Receive operation.
mq:BeginReceive()
RETOUR
Avez vous une quelconque idée de ce qui peut se passer ? Mon code est-il incohérent ?
Cordialement
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=19&topic_id=5892&post_id=23886