Přidáno 552 bajtů,
8. 10. 2012, 16:52 Uvolní řetězec z haldy.
;Deklarace
function StrDispose(Str: PChar);
;Režim
:Windows, Reálný, Chráněný
;Poznámky
:[[StrDispose]] uvolní řetězec, který byl předtím alokován pomocí [[StrNew]].
:Jestliže Str je [[nil]], [[StrDispose]] neprovede nic.
Vzorový příklad
{StrNew.PAS}
{Vzorový příklad pro funkci StrNew.}
{ Pro Windows: }
{ uses Strings, WinCrt; }
uses Strings;
var
P: PChar;
S: array[0..79] of Char;
begin
Readln(S);
P := StrNew(S);
Writeln(P);
StrDispose(P);
end.
[[Category:String]]