Section courante

A propos

Section administrative du site

NEW

 Nouveau
Turbo Pascal pour Windows System

Syntaxe

Procedure New(var p:Pointer);

Paramètres

Nom Description
p Ce paramètre retourne un pointeur

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

on obtiendra le résultat semblable suivant :

Prénom : Sylvain
Nom : Maltais
Ville : Laval

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