Описание |
Процедура New выходила в 2-х версиях.
Старшая версия - устаревший метод создания объектов (теперь вы можете вызывать, вместо этого, конструктор класса).
Первая версия размещает память в переменную типа указателя VariablePointer.
Newиспользуется, когда память требует фиксированного размера. Используйте GetMem, чтобы указать точный ассигнованный размер для хранения.
|
|
Похожие команды |
Dispose Очищает память на которую указывает указатель
FreeMem Освобождает память, используемую переменной
GetMem Получает указанное число байтов памяти.
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;
|
Her indoors - 55
|
|