DESTRUCTOR |
Destructeur |
---|---|
Virtual Pascal |
Syntaxe
Destructor method; |
Paramètres
Nom | Description |
---|---|
method | Ce paramètre permet d'indiquer le nom du destructeur |
Description
Ce mot réservé permet de définir la procédure permettant la libération de l'objet dans la programmation dans la POO (Programmation Orienté Objet).
Exemple
Voici un exemple de l'utilisation de ce mot réservé :
- Program DestructorSamples;
-
- Type
- MonObjet=Object
- Constructor Init;
- Procedure Run;
- Destructor Done;
- End;
-
- Constructor MonObjet.Init;Begin
- WriteLn('Initialisation de l''objet');
- End;
-
- Procedure MonObjet.Run;Begin
- WriteLn('Exécution de l''objet');
- End;
-
- Destructor MonObjet.Done;Begin
- WriteLn('Fin de l''objet');
- End;
-
- Var
- Objet:MonObjet;
-
- BEGIN
- Objet.Init;
- Objet.Run;
- Objet.Done;
- END.
on obtiendra le résultat suivant :
Initialisation de l'objetExécution de l'objet
Fin de l'objet
Dernière mise à jour : Vendredi, le 29 juillet 2016