Процедура 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;