Запомнить меня на этом копьютере
Пример программы для процедур New и Dispose.
{Dispose.PAS} { Пример программы для процедур New и Dispose } Type Str18 = String[18]; Var P : ^Str18; Begin New(P); P^:='Сейчас переменная есть...'; Dispose(P); { А теперь уже нет... } End.
Скачать dispose.pas