SYSGETMEM |
Système: Demande la mémoire |
|---|---|
| Delphi/Kylix/Lazarus | System |
Syntaxe
| Function SysGetMem(Size:Integer):Pointer; |
Paramètres
| Nom | Description |
|---|---|
| Size | Ce paramètre permet de demander la taille de la mémoire demandé en octet |
Description
Cette procédure permet d'effectuer une allocation dynamique sur la mémoire global de tas.
Exemple
Voici quelques exemples typiques de l'utilisation de la fonction «GetMem» en Delphi :
- Program SysGetMemSamples;
-
- {$APPTYPE CONSOLE}
- Uses SysUtils;
-
- Type
- TInteger = Array[0..20] of Integer;
-
- Var
- P:^TInteger;
- I:Integer;
-
- BEGIN
- P:=SysGetMem(20 * SizeOf(Integer));
- If NIL <> P Then Begin
- For I := 0 to 19 do P^[I] := 1000-(I * 10);
- WriteLn('Valeur P^[15] = ',P^[15]);
- SysFreeMem(P);
- End
- Else
- Begin
- WriteLn('Impossible d''allouer de la mémoire dynamiquement !');
- End;
- END.
on obtiendra le résultat suivant :
Valeur p[15] = 850
Dernière mise à jour : Mercredi, le 18 février 2015