AttacherModule
Fin AttacherModule
AttacherModule
permet de définir la procédure qui est appelée à chaque fois qu'un nouveau module est initialisé.
Il s'agit en fait d'une méthode de rappel implicite du type Module. L'objet Objet identifie alors le module qui vient d'être chargé.
/****************************************************************/
Fonction PrincipalT(T : Nul Ou Tache) Retourner Entier
/* Objet : Fonction principale d'une tache secondaire. */
/****************************************************************/
Debut
Ecran.Ecrire("Tâche "+T.NomTache);
Fin Fonction
AttacherModule
/************/
Debut
Ecran.Ecrire("AttacherModule:"+Objet.NomModule);
Fin AttacherModule
DetacherModule
/************/
Debut
Ecran.Ecrire("DetacherModule:"+Objet.NomModule);
Fin DetacherModule
AttacherTache
/***********/
Debut
Ecran.Ecrire("AttacherTache:"+Objet.NomTache);
Fin AttacherTache
DetacherTache
/***********/
Debut
Ecran.Ecrire("DetacherTache:"+Objet.NomTache);
Fin DetacherTache
Principal
/*******/
Variable
/******/
M : Nul Ou Module;
T : Nul Ou Tache;
Debut
Ecran.Ecrire("Debut Principal");
M=Module("UpsTrn",1,2,0);
Ecran.Ecrire("NomModule="+M.NomModule);
M=Nul;
T=Tache("ExempleDeTache", PrincipalT, Faux);
Attendre(5.0);
T=Nul;
Ecran.Ecrire("Fin Principal");
Fin Principal
AttacherTache pour définir la procédure exécutée à l'initialisation d'une tâche. DetacherTache pour définir la procédure exécutée à la terminaison d'une tâche.
- | - | - | - | - | - | - | - | - |