Section courante

A propos

Section administrative du site

MEMAVAIL

Mémoire disponible
Turbo Pascal pour Windows System

Syntaxe

Function MemAvail:LongInt;

Description

Cette fonction permet de demander la taille total en octet de mémoire dynamique allouable dans la mémoire de tas.

Exemple

Voici un exemple de l'utilisation de cette fonction :

  1. Program MemAvailSamples;
  2.  
  3. Uses WinCrt;
  4.  
  5. Var
  6.  A:Pointer;
  7.  
  8. BEGIN
  9.  If(MemAvail > 4096)Then Begin
  10.   If(MaxAvail > 4096)Then Begin
  11.    GetMem(A,4096);
  12.    WriteLn('Bloc de 4096 octets d''allouer');
  13.   End
  14.    Else
  15.   Begin
  16.    WriteLn('Pas assez de mémoire disponible en bloc continue');
  17.   End;
  18.  End
  19.   Else
  20.  Begin
  21.   WriteLn('Pas assez de mémoire disponible');
  22.  End;
  23.  WriteLn('Taille du plus gros bloc de mémoire disponible = ',MaxAvail);
  24.  WriteLn('Taille total de mémoire disponible = ',MemAvail);
  25. END.

on obtiendra un résultat semblable au suivant :

Bloc de 4096 octets d'allouer
Taille du plus gros bloc de mémoire disponible = 192816
Taille total de mémoire disponible = 192816


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