Методы в Object Pascal. Семенов Н.М. - 6 стр.

UptoLike

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

6
. . .
end;
Объявления методов-процедур могут быть перемешаны с объявлениями методов-функций
и методов других видов (например, конструкторов). Объявления элементов класса могут быть
сгруппированы в разделы (например, public). Единственное требование - чтобы в пределах
каждого раздела в описании класса все поля появлялись до объявления методов.
Рассмотрим пример почти полного объявления класса, включающего в себя методы -
функции, методы-процедуры и поля. Цель этого примера - показать, как объявляются обычные
методы, поэтому среди объявленных в классе методов отсутствуют конструктор и деструктор.
type
TBook = class
FAuthor : TAuthor;
FTitle : String;
function GetAuthor : TAuthor;
procedure SetAuthor(const AnAuthor : TAuthor);
function GetTitle : String;
procedure SetTitle(ATitle : String);
end;
В объявлении класса TBook присутствуют два поля данных - FAuthor и FTitle, а также
несколько методов - процедур и методов - функций.
1.2 Конструкторы
Конструкторы объявляются почти так же, как и другие методы, только вместо слов
procedure или function ставится зарезервированное слово constructor.
Конструктор - специальный вид подпрограммы, присоединенной к классу. Его роль -
создавать представителей класса. Он ведет себя как функция, которая возвращает ссылку на
вновь созданный экземпляр объекта.
Общий синтаксис для объявления конструктора объекта следующий:
type
ИмяКласса = class(ИмяРодителя)
. . .
constructor Имя(<Список параметров>);
. . .
end;
Примеры:
TClientWindow = class(TWindow)
. . .
constructor Create(AnOwner: TWindow);
constructor CreateOffDesktor;
. . .
end;