ReallocMem Позволяет изменить размер существующего блока памяти
Пример кода : Распределение памяти для записи, и её назначение
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 - %d',[custRecPtr.name, custRecPtr.age]); // Теперь избавляемся от этой распределенной записи
Dispose(custRecPtr);
end;
