Section courante

A propos

Section administrative du site

DESTRUCTOR

 Destructeur
Turbo Pascal pour Windows  

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é :

  1. Program DestructorSamples;
  2.  
  3. Uses WinCrt;
  4.  
  5. Type
  6.  MonObjet=Object
  7.   Constructor Init;
  8.   Procedure Run;
  9.   Destructor Done;
  10.  End;
  11.  
  12. Constructor MonObjet.Init;Begin
  13.  WriteLn('Initialisation de l''objet');
  14. End;
  15.  
  16. Procedure MonObjet.Run;Begin
  17.  WriteLn('Exécution de l''objet');
  18. End;
  19.  
  20. Destructor MonObjet.Done;Begin
  21.  WriteLn('Fin de l''objet');
  22. End;
  23.  
  24. Var
  25.  Objet:MonObjet;
  26.  
  27. BEGIN
  28.  Objet.Init;
  29.  Objet.Run;
  30.  Objet.Done;
  31. END.

on obtiendra le résultat suivant :

Initialisation de l'objet
Exécution de l'objet
Fin de l'objet

Dernière mise à jour : Dimanche, le 10 décembre 2017