Section courante

A propos

Section administrative du site

NEW

 Nouveau
Delphi/Kylix/Lazarus System

Syntaxe

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

on obtiendra le résultat semblable suivant :

Prénom : Sylvain
Nom : Maltais
Ville : Laval

Voir également

Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - Dispose
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - FreeMem
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - GetMem
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - ReallocMem

Dernière mise à jour : Mercredi, le 18 février 2015