Procedure StrDispose (P : PChar) ;
Removes the string in P from the heap and releases the memory.
None.
Dispose (), StrNew
Program Example17; Uses strings; { Program to demonstrate the StrDispose function. } Const P1 : PChar = 'This is a PChar string'; var P2 : PChar; begin Writeln ('Before StnNew : Memory available : ',MemAvail); P2:=StrNew (P1); Writeln ('After StrNew : Memory available : ',MemAvail); Writeln ('P2 : ',P2); StrDispose(P2); Writeln ('After StrDispose : Memory available : ',MemAvail); end.