Программы и модули Delphi. Семенов Н.М. - 12 стр.

UptoLike

ВУЗ: 

ТПУ | Томск

Составители: 

Рубрика: 

<public methods>
protected
<protected fields>
<protected methods>
private
<private fields>
<private methods>
end;
Объявление класса имеет три возможных раздела, которые определяют
доступность полей и методов. Раздел public объявляет поля и методы, не имеющие
никаких ограничений доступа - экземпляры класса и классы - потомки могут иметь
доступ к этим полям и методам. Раздел protected объявляет поля и методы, имеющие
некоторые ограничения доступа - классы - потомки могут иметь
доступ к этим полям и
методам. Раздел private объявляет поля и методы, имеющие серьёзные ограничения
доступа - экземпляры класса или классы - потомки к ним обращаться не могут.
Пример:
Type
TTimeClas = class
public
constructor Initialize;
procedure SetHour (dHour : Integer);
procedure SetMinute (dMinute : Integer);
procedure SetSecond (dSecond : Integer);
function GetHour : Integer;
function GetMinute : Integer;
function GetSecond : Integer;
protected
Hour : Integer;
Minute : Integer;
Second : Integer;
end;
Класс TTimeClass объявляет три защищённых поля : Hour, Minute и Second.
Класс объявляет методы для инициализации, установки и опроса защищённых полей.
Цель объявления класса - возвратить количество секунд, прошедших с
полуночи.
3.3.2 Поля класса
Поля класса содержат данные (или состояния, если Вам больше нравится),
которые определяют атрибуты экземпляров класса. Общее практическое правило -
надо избегать объявление поля как public до тех пор, пока объявление public не
становится более практичным. Например, класс TTimeClass, объявленный в
предыдущем разделе, имеет методы, предназначенные для опроса защищённых полей.
Поскольку эти методы созданы для того, чтобы дать полный доступ к защищённым
полям, Вы можете определить более короткую версию класса TTimeClass следующим
образом:
Type
TTimeClass =class

Страницы