Delphi-Help

  • Increase font size
  • Default font size
  • Decrease font size
Главная

New

Печать
Рейтинг пользователей: / 0
ХудшийЛучший 

New

Описание

1. procedure New ( var VariablePointer : Pointer-Type ) ;

2. procedure New ( var ObjectPointer : Object-Pointer; Constructor ) ;

Процедура New выходила в 2-х версиях.

Старшая версия - устаревший метод создания объектов (теперь вы можете вызывать, вместо этого, конструктор класса).

Первая версия размещает память в переменную типа указателя VariablePointer.

New используется, когда память требует фиксированного размера. Используйте GetMem, чтобы указать точный ассигнованный размер для хранения.

Пример кода

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

Примечание

 

 

Авторизация



Счетчики