Auteur: Patrick BikerExemples évolués
Chaque exemple montre une utilisation pratique de la fonction du WLangage.
Quand plusieurs syntaxes sont possibles, chacune est illustrée indépendamment.
Cet exemple de code est un code présent sur le poste Client DDE. Ce code permet de lancer le serveur DDE puis de lui faire exécuter une action. Le résultat de l'action effectuée est récupéré grâce à la fonction DDEChaîne .
|
||
|
// Exemple de client
NumConnexion est un entier DDELance(NomServeur) // Lance le serveur NumConnexion = DDEConnecte(NomServeur, "MonSujet") // Connexion // Prépare la réception des messages dans la procédure MODIF DDEEvénement("MODIF", DDEAModifier ) // ... // Exécute une action par le serveur DDEExécute(NumConnexion, "EXE1") SI DDERécupère(NumConnexion, "Item1") ALORS Info("La donnée récupérée est" + DDEChaîne ()) FIN // ... // Envoie une valeur DDEEnvoie(NumConnexion, "Item2", Valeur) // ... // Déconnexion DDEDéconnecte(NumConnexion)
|
