Методы класса

Интересным нововведением в Delphi являются так называемые методы класса, особенность которых состоит в том, что для их вызова нет необходимости создавать объект (экземпляр класса), а можно использовать их как обычные подпрограммы. Для описания таких методов используется ключевое слово Class перед заголовком метода:

Туре

<Имя класса> = Class

Class <Заголовок метода>; {Описание метода класса}

End;

При реализации методов класса в описательной части класса ключевое слово Class также указывается:

Class <Имя класса>.<Заголовок метода>;

Методы класса применяются для создания библиотек специализированных методов, не требующих доступа к каким-либо данным, которые могут храниться в пределах объекта. В качестве примера приведем описание класса MthdClass, метод Gets которого является методом класса (листинг 3.2).

Листинг 3.2. Пример описания методов класса

Unit DeclaringClassMethods;

Interface

Type

MthdClass = class

class Function GetS: Double;

End;

Implementation

class Function MthdClass.GetS: Integer;

{Описание метода GetS класса MthdClass}

Begin

Result:= 5;

end;

end.

Для вызова метода класса необходимо указать название класса и название метода со списком необходимых параметров. Название класса и его метода разделяются точкой:

<Класс>.<Метод>(<Список параметров>);

Использование метода класса отражено в следующем листинге 3.3.

Листинг 3.3. Использование метода класса

Unit UsingClassMethods;

Uses DeclaringClassMethods;

{Подключаем модуль DeclaringClassMethods,

в котором описан класс MthdClass}

Interface

Implementation

Procedure UsingClass; {Описание процедуры UsingClass}

Var

A: Integer; {Описание целочисленной переменной А}

Begin

A:= MthdClass.GetS; {Вызов метода класса по имени класса

и метода, в переменную А заносится значение 5}

end;

end.

Отметим, что методы класса иногда называют статическими методами.