Section courante

A propos

Section administrative du site

Dispose

Disposition
HighSpeed Pascal System

Syntaxe

Procedure Dispose(var P:Pointer);

Paramètres

Nom Description
P Ce paramètre permet d'indiquer le pointeur à traiter.

Description

Cette procédure permet de libérer une partie de la mémoire préalablement alloué par la procédure New.

Remarques

Exemple

L'exemple suivant permet d'entrée le nom et l'age dan un enregistrement, d'ajouter ses informations dans la mémoire de tas et de libérer ensuite ses informations de la mémoire :

  1. Program DisposeSamples;
  2. Type
  3.  PersonType=RECORD
  4.   Name:String[ 20];
  5.   Age:Byte;
  6.  End;
  7. Var
  8.  PersonData:^PersonType;
  9. BEGIN
  10.  New(PersonData); { Alloue de l'espace sur le tas }
  11.  With PersonData^ do Begin
  12.   Write('Entrez le nom: '); 
  13.   ReadLn(Name);
  14.   Write('Entrez l''age : '); 
  15.   ReadLn(Age);
  16.  End;
  17.  Dispose(PersonData); { Libère l'espace }
  18. END.


Dernière mise à jour : Lundi, le 20 avril 2020