Section courante

A propos

Section administrative du site

NEW

Nouveau
Virtual Pascal System

Syntaxe

Procedure New(var p:Pointer[;constructeurobject[(ArgList)]]);
Function New(var p:Pointer[;constructeurobject[(ArgList)]]):Pointer;

Paramètres

Nom Description
p Ce paramètre retourne un pointeur
constructeurobject Ce paramètre permet d'indiquer le constructeur de l'objet
ArgList Ce paramètre permet d'indiquer la liste des paramètres envoyer comme argument

Description

Cette fonction permet d'allouer de la mémoire dynamique pour une variable.

Exemple

Voici un exemple d'une utilisation typique de cette procédure :

  1. Program NewSamples;
  2.          
  3. Type
  4.  personne=Record
  5.   salutation:Char;
  6.   prenom:String[30];
  7.   nomfamille:String[30];
  8.   ville:String[30];
  9.   pays:String[30];
  10.   province:String[30]; 
  11.  End;
  12.          
  13. Var
  14.  a:^personne;
  15.          
  16. BEGIN
  17.  New(a);
  18.  If(a <> NIL)Then Begin
  19.   a^.salutation := 'M';
  20.   a^.prenom := 'Sylvain';
  21.   a^.nomfamille := 'Maltais';
  22.   a^.ville := 'Laval';
  23.   a^.pays := 'CA';
  24.   a^.province := 'QC';
  25.   WriteLn('Prénom : ',a^.prenom);
  26.   WriteLn('Nom : ',a^.nomfamille);
  27.   WriteLn('Ville : ',a^.ville);
  28.   Dispose(a);
  29.  End
  30.   Else 
  31.  Begin
  32.   WriteLn('Manque de mémoire');
  33.  End;
  34. END.

on obtiendra le résultat semblable suivant :

Prénom : Sylvain
Nom : Maltais
Ville : Laval


Dernière mise à jour : Vendredi, le 29 juillet 2016