Введение в программирование. Pascal и Delphi. Гурьянов Л.В - 115 стр.

UptoLike

114
8.1.2. Создание и уничтожение объектов
Главное отличие объектов в Object Pascal заключается в том, что
все
объекты создаются динамически.
Для создания объекта необходимо вызвать конструктор (в Object
Pascal
он обычно называется Create), который возвращает указа-
тельадрес созданного объекта.
Для уничтожения объекта рекомендуется вызывать метод
Free,
который проверяет существование объекта (не равен ли он
nil), а
затем вызывает деструктор (в
Object Pascal он обычно называется
Destroy).
Пример создания и уничтожения объекта:
type
ТМуClass = class (TObject)
private
. . .
public
. . .
constructor Create; // Конструктор
destructor Destroy; // Деструктор
end;
. . . // Реализация методов класса
var
МуObject: ТМуClass;
begin
МуObject := ТМуClass.Create; { Создание объекта:
имя объекта, МуObject – указатель, результат вызова конст-
руктора
конструктор по синтаксису процедура, но вызывается как
функция
конструктор вызывается c именем классаТМуClass
.Create
}
. . .
МуObject.Free; // Уничтожение объекта
end.
  8.1.2. Создание и уничтожение объектов
   Главное отличие объектов в Object Pascal заключается в том, что
все объекты создаются динамически.
   Для создания объекта необходимо вызвать конструктор (в Object
Pascal он обычно называется Create), который возвращает указа-
тель – адрес созданного объекта.
   Для уничтожения объекта рекомендуется вызывать метод Free,
который проверяет существование объекта (не равен ли он nil), а
затем вызывает деструктор (в Object Pascal он обычно называется
Destroy).
   Пример создания и уничтожения объекта:
   type
     ТМуClass = class (TObject)
     private
   ...
     public
       ...
      constructor Create; // Конструктор
      destructor Destroy; // Деструктор
     end;
     ...                     // Реализация методов класса
   var
     МуObject: ТМуClass;
   begin
     МуObject := ТМуClass.Create; { Создание объекта:
   имя объекта, МуObject – указатель, результат вызова конст-
руктора
   конструктор по синтаксису процедура, но вызывается как
функция
   конструктор вызывается c именем класса – ТМуClass.Create
   }
   ...
     МуObject.Free;          // Уничтожение объекта
   end.



                               114