DebuterComposantFin DebuterComposant
DebuterComposant permet de définir la procédure qui est appelée pour initialiser le composant. Cette procédure optionnelle est généralement utilisée pour initialiser les objets globaux et pour charger les ressources globales.
Un procédure implicite est automatiquement appelée avant DebuterComposant. Elle construit les objets globaux du composant et les initialise à leur valeur par défaut.
Les composants sont initialisés en tenant compte de leur priorité. Si le module A utilise le module B par le biais de l'instruction ImporterModule, alors la priorité de B doit être inférieure à celle de A et le module B est initialisé avant le module A.
Un composant est réentrant s'il est employé dans un serveur offrant ses services à plusieurs clients simultanément. En ce cas, DebuterComposant est exécutée au début de chaque instance liée à un client.
Prive :
Constante
/*******/
CO_TailleTableau=100;
Prive :
Type Vehicule
/***********/
...
Fin Type
Variable
/******/
Prive :
TableVehicules : Tableau[1 JusquA CO_TailleTableau] De ReferenceDe Nul Ou Vehicule;
DebuterComposant
/**************/
Variable
/******/
I : Entier;
Debut
/* Aucun des vehicules n'est encore alloues. */
Pour I=1 JusquA CO_TailleTableau Faire
TableVehicules[I]=Nul;
Fin Pour
Fin DebuterComposant
| - | - | - | - | - | - | - | - | - |