Глава 9. Объектно-ориентированное программирование(часть2) Инкапсуляция

Объединение в объекте кода и данных называется инкапсуляци-

ей. Возможно вы сможете предоставить достаточное количество мето-

дов, благодаря чему пользователь объекта никогда не будет обра-

щаться к полям объекта непосредственно. Некоторые другие объектно

-ориентированные языки, например Smalltalk, требуют обязательной

инкапсуляции, однако в Borland Pascal у вас есть выбор, а хорошая

практика объектно-ориентированного программирования во многом за-

висит от вашей добросовестности.

Объекты TEmployee и THourly написаны таким образом, что со-

вершенно исключена необходимость прямого обращения к их внутрен-

ним полям данных:

type

TEmployee = object

Name, Title: string[25];

Rate: Real;

procedure Init (AName, ATitle: string; ARate: Real);

function GetName : String;

function GetTitle : String;

function GetRate : Real;

function GetPayAmount : Real;

end;

THourly = object(TEmployee)

Time: Integer;

procedure Init(AName, ATitle: string; ARate:

Real, Atime: Integer);

function GetPayAmount : Real;

end;

Здесь присутствуют только четыpе поля данных: Name, Title,

Rate и Time. Методы ShowName и ShowTitle выводят фамилию pаботаю-

щего и его должность, соответственно. Метод GetPayAmount исполь-

зует Rate, а в случае pаботающего THourly и Time для вычисления

суммы выплат pаботающему. Здесь уже нет необходимости обpащаться

непосpедственно к этим полям данных.

Предположив существование экземпляра AnHourly типа THourly,

вы могли бы использовать набор методов для манипулирования полями

данных AnHourly, например:

with AnHourly do

begin

Init ('Allison Karlon, Fork lift operator' 12.95, 62);

{ Выводит на экpан фамилию, должность и сумму выплат}

Show;

end;

Обратите внимание, что доступ к полям объекта осуществляется

не иначе, как только с помощью методов этого объекта.

Методы: никакого ухудшения

Добавление этих методов незначительно увеличивает объем ис-

ходного кода, однако развитый компоновщик Borland Pascal выбрасы-

вает код любого метода, который ни разу не вызывается в програм-

ме. Поэтому вам не следует отступать при предоставлении объекту

того или иного метода, который имеет одинаковые шансы быть как

использованным, так и неиспользованным в каждой программе, в ко-

торой задействован данный тип объекта. Неиспользуемые методы ни-

чего не будут стоить вам как в части качества выполнения програм-

мы, так и в части ее размера, - если они не используются в прог-

рамме, то они попросту отсутствуют в ней.

Замечание по поводу абстрактности данных: Имеется громадное

преимущество в возможности полностью отсоединить THourly от гло-

бальных ссылок. Если ничто вне объекта не "знает" о представлении

его внутренних данных, то программист, контролирующий объект, мо-

жет изменять детали внутреннего представления данных до тех пор,

пока не изменится заголовок метода.

Внутри самого объекта данные могут быть представлены в виде

массива, однако позднее (возможно, что сфера действия прикладной

программы расширяется и объем ее данных растет) в качестве более

эффективного представления данных может быть признано двоичное

дерево. Если объект полностью инкапсулирован, изменение представ-

ления данных с массива на двоичное дерево вообще не изменит ис-

пользование объекта. Интерфейс с объектом останется полностью тем

же, позволяя программисту изящно приспосабливать эксплуатационные

качества объекта без изменения кода, использующего объект.