Алгоритмы и программы. Афанасьева Т. В - 220 стр.

UptoLike

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

220
Для создания экземпляра данного объекта можно использовать
стандартные способы объявления переменных и создания динамических
переменных.
var Window: CWindow;
begin
Window.Init (20,5,40,10);
Window.Show;
end.
13.2. Инкапсуляция
Инкапсуляция это свойство системы, позволяющее объединить
данные и методы, работающие с ними, в классе и скрыть детали
реализации от пользователя. Инкапсуляция или сокрытие реализации
является базовым свойством ООП. Она позволяет создавать
пользовательские объекты, обладающие требуемыми методами и далее
оперировать ими, не вдаваясь в устройство этих объектов.
В Turbo Pascal средства объектноориентированного
программи-
рования связаны с тремя зарезервированными словами: OBJECT
CONSTRUCTOR и DESTRUCTOR и двумя стандартными директи-
вами: PRIVATE и VIRTUAL.
Зарезервированное слово OBJECT используется для описания
объекта. Описание объекта должно помещаться в разделе описания типов,
например:
Пример 13.2.
type
Tpoint = object
X,Y: Integer; {Координаты точки}
Color:word; {Цвет точки)
Visible: Boolean; {Признак светимости}
Procedure Setlocation (NewX, NewY: integer);
{Задает новое положение, точки на экране}
Procedure SetCoforfNewColor: word); {Устанавливает цвет точки}
Procedure SetVislble(VIS: Boolean);
{Выводит или
гасит точку)
Procedure GetLocatIon(var Xloc, YLoc:integer);
{Возвращает координаты точки}
Function GetColor: word;