Процедура New в Delphi создаёт новую переменную типа указатель.
System unit
- procedure New (var VariablePointer : Pointer-Type);
- procedure New (var ObjectPointer : Object-Pointer; Constructor);
Процедура New выходила в 2-х версиях.
Старшая версия – устаревший метод создания объектов (теперь вы можете вызывать, вместо этого, конструктор класса).
Первая версия размещает память в переменную типа указателя VariablePointer.
New используется, когда память требует фиксированного размера. Используйте GetMem, чтобы указать точный ассигнованный размер для хранения.
Процедура New: Распределение памяти для записи, и её назначение
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
Похожие функции, процедуры и команды
Dispose — очищает память на которую указывает указатель.
FreeMem — освобождает память, используемую переменной.
GetMem — получает указанное число байтов памяти.
ReallocMem — позволяет изменить размер существующего блока памяти.
