Des exemples d'utilisation des fonctions du WLangage
Rien de tel qu'un exemple pour comprendre une fonction de WLangage. Dans cette section, vous trouverez des exemples simples.
Des exemples évolués, où la fonction est utilisée en contexte, sont également disponible sur ce site.
ExeInfo (en anglais ExeInfo)
VersionProg est une chaîne
VersionProg = ExeInfo ( exeVersion , "Appli.exe") SI VersionProg <> "2.0A" ALORS Erreur("La version du programme installé n'est pas la bonne") FIN
|
ExeInfo (en anglais ExeInfo)
// Récupérer le nom de l'application (sans le chemin complet)
NomProg = ExeInfo ("OriginalFilename", "Appli.exe") // L'exécutable n'a pas été renommé NomProg = fExtraitChemin( ExeInfo ( exeNom ), fFichier + fExtension )
|
ExeInfo (en anglais ExeInfo)
sRepExe est une chaîne
SI EnModeTest() ALORS // En mode test on renvoie le répertoire d'exécution sRepExe = fRepEnCours() SINON sRepExe = ExeInfo ( exeRépertoire ) FIN
|
ExeLance (en anglais ExeRunning)
NbLance est un entier =
ExeLancé
("C:\WINDEV\PROGRAMMES\WINDEV.EXE")
SI NbLance > 0 ALORS Info("Vous utilisez WinDev !") FIN
|
ExeLance (en anglais ExeRunning)
NbLance est un entier =
ExeLancé
("Calc.EXE")
SI NbLance > 0 ALORS Info("Vous utilisez la calculatrice !") FIN
|
ExeListeDLL (en anglais ExeListDLL)
-- Code d'initialisation du champ "ListeAppli"
// Ajout des applications en cours d'exécution dans le champ "ListeAppli" ListeAjoute(ListeAppli, ExeListeProcessus( exePID , exeNomCourt )) -- Code de sélection d'une ligne de "ListeAppli" // Extraction de l'identifiant de l'application sélectionnée dans la liste InfoAppli est une chaîne = ListeAppli[ListeAppli] IdAppli est une chaîne = ExtraitChaîne(InfoAppli, 1) // Affichage des DLL utilisées dans le champ "ListeDLL" ListeAjoute(ListeDLL, ExeListeDLL (IdAppli))
|
ExeListeProcessus (en anglais ExeListProcess)
// Ajout des applications en cours d'exécution dans le champ "ListeAppli"
ListeAjoute(ListeAppli, ExeListeProcessus ( exePID , exeNomCourt ))
|
ExePriorite (en anglais ExePriority)
// Sélection de l'application à manipuler
nIndice est un entier = TableSelect ( Table1 ) SI nIndice <> - 1 ALORS // Priorité de l'application sélectionnée ? i est un entier = ExePriorité ( Table1 . PID [ nIndice ]) SELON i CAS exePrioritéBasse Info ( "Priorité basse" ) CAS exePrioritéHaute Info ( "Priorité haute" ) CAS exePrioritéInferieureNormale Info ( "Priorité inférieure à la normale" ) CAS exePrioritéNormale Info ( "Priorité normale" ) CAS exePrioritéSuperieureNormale Info ( "Priorité supérieure à la normale" ) CAS exePrioritéTempsRéel Info ( "Priorité temps réel" ) CAS CAS
|
ExeTermine (en anglais ExeTerminate)
ExeTermine (en anglais ExeTerminate)
LanceAppli (en anglais ExeRun)
LanceAppliAssociee (en anglais ShellExecute)
// Ouvre le document "Fonctions.doc" dans Word
LanceAppliAssociée ("C:\WDNEWS\Version\Fonctions.doc") // Imprime le document LanceAppliAssociée ("C:\WDNEWS\Version\Fonctions.doc", "print")
|
LanceAppliAssociee (en anglais ShellExecute)
LanceAppliAssociee (en anglais ShellExecute)
LanceAppliAssociee (en anglais ShellExecute)
// Lancement de la messagerie configurée par défaut
LanceAppliAssociée ("mailto:pcsoft@pcsoft.fr") // Lancement de la messagerie avec paramètres // Paramètres reconnus par outlook LanceAppliAssociée ("mailto:pcsoft@pcsoft.fr" + ... "?subject=Sujet : LST &body=Texte : le sommaire de la LST")
|
LanceAppliAssociee (en anglais ShellExecute)
// Ouvre le document "Facture.doc" à partir de son raccourci
LanceAppliAssociée ("""C:\Documents and Settings\Julie\Bureau\Raccourci vers Fonctions.doc.lnk""")
|