Release

Z Delphi & Pascal (česká wiki)
Verze z 9. 10. 2012, 21:20, kterou vytvořil Zdeno Sekerák (diskuse | příspěvky)
(rozdíl) ← Starší verze | zobrazit aktuální verzi (rozdíl) | Novější verze → (rozdíl)
Skočit na navigaci Skočit na vyhledávání

Vrací haldu do daného stavu.

Deklarace
procedure Release(var p: pointer);
Režim
Reálný, Chráněný
Poznámky
Neměla by být používána s FreeMem ani Dispose.
Viz také
Dispose
FreeMem
GetMem
Mark
New


Vzorový příklad 

{Mark.PAS}
{ Vzorový příklad pro Mark a Release }
uses Crt;
 var
   p : pointer;
   p1,p2,p3 : ^Integer;
 begin
   ClrScr;
   New(p1); { Alokuje Integer }
   Mark(p); { Uloží stav haldy }
   New(p2); { Alokuje další dva Integer }
   New(p3);
   Release(p); { Paměť, rezervovaná pro p2^ a
                 p3^, byla uvolněna ; p1^
                 může být stále použito }
 end.
Citováno z „https://trsek.com/pascal/index.php?title=Release&oldid=1711“