лизируем поля об'єкта} Кімната: довжина = ',
AJength, V Ширі = A.width);
WriteLnCПлощадь кімнати = A.Square);
End.
У Borland Pascal можна обмежити доступ до полів і методів класу в межах модуля. Для цього опис класу ділиться на спеціальні секції:
public -секція, яка містить опис загальних або загальнодоступних полів і методів класу;
private - секція, яка містить опис внутрішніх або прихованих полів і методів класу.
В описі класу ці секції можуть чергуватися, причому, якщо секції компонент не вказані, то за замовчуванням приймається, що ці компоненти доступні як загальні:
Unit <ім'я модуля>;
Interface
Туре <ім'я класу> = object
<опис загальних полів і методів>
private
<опис внутрішніх полів і методів>
public
<опис загальних полів і методів>
private
<опис внутрішніх полів і методів>; ...
Наприклад, у нашому випадку, якщо об'єкти класу TRoom використовуються тільки для отримання інформації про площі кімнати, то можна поля описати в секції private, але тоді доступ до цих полів з програми стане неможливим:
Unit RoomHiden;
Interface
Type TRoom = object
private {приховані компоненти класу}, width: real; {поля: довжина і ширина кімнати}
public {загальні компоненти класу} Square.real; {метод визначення площі}
procedure Init (l, w: real); {ініціалізував метод};
Implementation
Function TRoom.Square; {метод визначення площі}: = length "^ width;; TRoomJnit; {ініціалізував метод}: = 1; width: = w;;
End.
Приховування деяких полів і методів класу спрощує інтерфейс класу, тобто програміст, що використовує бібліотечний клас, не отримує зайвої для нього інформації про внутрішні механізми реалізації стану та поведінки об'єктів даного класу. Одночасно з цим програміст, що займається розробкою бібліотечних класів, отримує можливість вносити зміни в реалізацію класу, не піклуючись про зміну програм, які використовують об'єкти даного класу. br/>
2. ПРАКТИЧНА ЧАС...
