Delphi-6 - среда разработки программного обеспечения для систем промышленной автоматизации. Букреев В.Г - 67 стр.

UptoLike

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

aStrField: String;
aObjField: TObject;
end;
Каждый объект получает уникальный набор полей, но общий для
всех объектов данного класса набор методов и свойств. Фундаменталь-
ный принцип инкапсуляции требует обращаться к полям только с по-
мощью методов и свойств класса. Однако в Object Pascal разрешается
обращаться к полям и напрямую:
type
TMyClass = class
FIntField: Integer;
FStrField: String; end;
var
aObject: TMyClass;
begin
aObject.FIntField := 0;
aObject.FStrField := 'Строка символов';
end;
Класс-потомок получает все поля всех своих предков и может допол-
нять их своими, но он не может переопределять их или удалять. Таким
образом, чем ниже в дереве иерархии располагается класс, тем больше
данных получают в свое распоряжение его объекты.
Методами называются инкапсулированные в классе процедуры и
функции. Они объявляются так же, как и обычные подпрограммы:
type
TMyClass = class
Function MyFunc(aPar: Integer): Integer;
Procedure MyProc;
end;
Доступ к методам класса, как и к его полям, возможен с помощью со-
ставных имен:
var
aObject: TMyClass;
begin
aObject.MyProc;
end;
67