Процедура Dispose – очищує пам'ять на яку вказує покажчик

Процедура Dispose в Delphi очищує пам'ять на яку вказує покажчик.

Процедура Dispose: Розподіл пам'яті для запису, присвоєння і потім звільнення від неї

type
  TCustomer = Record
    name : string[20];
    age  : Byte;
  end;

var
  custRecPtr : ^TCustomer;

begin
  // Створення запису клієнта за допомогою 'New'
  New(custRecptr);

  // Присвоєння йому значень
  custRecPtr.name := 'Her indoors';
  custRecPtr.age  := 55;

  // Тепер показуємо ці значення
  ShowMessageFmt('%s is %d',[custRecPtr.name, custRecPtr.age]);

  // Тепер позбавляємося цього розподіленого запису
  Dispose(custRecPtr);
end;