Finalization

Модули.

Модули – это программные единицы, служащие для размещения фрагментов программ, работают они совместно с основной программой, но компилироваться могут отдельно. Используемые модули указываются в разделе Uses.

Конструкция модуля

Unit <имя модуля>;

Interface

…

Implementation

…

Initialization

…

finalization

…

end.

Заголовок модуля Unit<имя>; для правильной работы имя модуля должно совпадать с именем дискового файла в котором записан модуль.

В разделе interface мы сообщаем компилятору, какие типы, переменные, константы, подпрограммы должны стать доступными основной программе и/или другим модулям.

При объявлении типов и переменных они указываются полностью, а при объявлении глобальных подпрограмм указываются только их заголовки.

В разделе Implementation описываются подпрограммы объявленные в интерфейсной части. Описанию подпрограммы должен соответствовать заголовок, в котором можно опустить список формальных параметров, а можно и не опускать, но если решено не опускать список параметров, то они должны быть повторены в точности.

В инициирующей части находятся операторы, которые выполняются до запуска основной программы, они готовят переменные файлы необходимые программе и модулю.

Инициирующая и завершающая части используются редко. При старте программы выполняются сначала инициирующие части всех модулей в порядке их перечисления в основной программе в разделе Uses, а после завершения также выполняются завершающие части модулей.

КЛАССЫ, ОБЪЕКТЫ

Классы – это типы специального вида, которые содержат поля, методы и свойства.

Классы, как и любые другие типы, служат образцами для создания конкретных экземпляров.

Конкретные экземпляры класса называются объектами.

Объявление класса

Type

TmyCl=class(Tobject)

Fint:integer;

Fstr:string;

Function Func1(a:real):integer;

Procedure Proc1;

End;

Var

MyClass:TmyCl;

FunctionTmyCl.Func1(a:real):integer;

Beginresult:=a* Fint ; end;

ProcedureTmyCl.Proc1;

Begin …; end;

Begin

MyClass:=TmyCl.create;

MyClass.Fint:=10;

MyClass.Proc1;

MyClass.Free;

End.

ПРИНЦИПЫ ООП

В основе классовой борьбы лежат три фундаментальных принципа:

- инкапсуляция, наследование, полиморфизм.