|
|
|
|
|
- Exemple d'utilisation de la propriété AjoutTerminé
Exemple d'utilisation de la propriété AjoutTerminé Pour mettre en place cet exemple : - Créer une fenêtre. Saisir le code WLangage associé à l'événement "Initialisation" de cette fenêtre.
- Créer un champ Bouton "BTN_Ajouter". Saisir le code WLangage correspondant à l'événement "Clic" de ce champ.
- Créer un champ Bouton "BTN_Arrêter". Saisir le code WLangage correspondant à l'événement "Clic" de ce champ.
- Créer et saisir la procédure du thread.
Pour tester cet exemple : - Afficher la fenêtre : le thread se lance, rien ne se passe. Ce fonctionnement est normal, car le thread attend si la pile est vide.
- Cliquer sur le champ Bouton permettant l'ajout (BTN_Ajout) : seules les traces des fichiers sont affichées. La trace de fin n'est pas affichée.
- Cliquer encore une fois sur le champ Bouton permettant l'ajout (BTN_Ajout) : seules les traces des fichiers sont affichées. La trace de fin n'est toujours pas affichée.
- Cliquer sur le champ Bouton de terminaison (BTN_Arrêter) : la trace de fin s'affiche (le thread s'arrête).
- Cliquer sur le champ bouton permettant l'ajout (BTN_Ajout) : rien ne se passe. Ce fonctionnement est normal car le thread est arrêté.
ThreadExécute("test", threadNormal, TraitementsDeFichiers)
sListfic est une chaîne = fListeFichier("c:\temp\*.*", frNonRécursif)
stUnFic est un STFile
gFilesnames.AjoutTerminé = Faux
POUR TOUTE CHAÎNE sUnfic DE sListfic SÉPARÉE PAR RC
stUnFic.sChemin = sUnfic
stUnFic.sNomfic = fExtraitChemin(sUnfic, fFichier + fExtension)
Empile(gFilesnames, stUnFic)
FIN
gFilesnames.AjoutTerminé = Vrai
PROCÉDURE TraitementsDeFichiers()
stTemp est un STFile
tt est un booléen
tt = Dépile(gFilesnames, stTemp, AttendSiVide)
TANTQUE tt
Trace(stTemp.sNomfic)
tt = Dépile(gFilesnames, stTemp, AttendSiVide)
FIN
Trace("fin")
Documentation également disponible pour…
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|