Модули

Begin

Begin

//Тело процедуры

end;

Заголовок процедуры состоит из служебного слова Procedure, имени процедуры латинскими буквами и списка формальных параметров, заключённого в круглые скобки. В данном случае в списке параметров указаны параметры-значения (р1, р2, …), параметры-переменные (n1, n2, …) и параметры-константы (k1, k2, …). Каждый из видов параметров может включать параметры различных типов. В этом случае они разделяются символом ";".

Процедуры описываются в разделе объявлений главной программы.

Вызывается процедура в разделе операторов главной программы. Формат вызова:

<имя процедуры>(<список аргументов через запятую,

без указания типов>);

4.7. 4. Функция возвращает одно значение.

Формат объявления функции:

Function <имя>(p1,p2:T1;...):<тип результата>;

//заголовок функции

{Разделы определений и описаний локальных параметров и подпрограмм}

{.........}

<имя>:=<выражение>;

{.........}

end;

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

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

Тип функции должен быть совместим с типом, необходимым для использования в выражении, в котором функция вызывается.

Функции описываются в разделе объявлений главной программы.

Вызывается функция в разделе операторов главной программы путем указания ее имени в нужном месте вычисляемого выражения. Формат вызова функции:

<имя функции>(<список аргументов через запятую,

без указания типов>);

Если директивами компилятора разрешен расширенный синтаксис, то допускается вызов функции, как процедуры. При этом возвращаемый функцией результат игнорируется.

Разработав функцию или процедуру, программист может ее использовать в другой программе. Free Pascal позволяет пользователю поместить свои функции и процедуры в отдельный модуль, а затем вызывать и использовать их в других программах, указав имя модуля в списке модулей в разделе uses.

Для создания нового модуля необходимо из меню File выбрать команду New => Unit (Файл/Новый/Модуль). В результате открывается окно редактора кода, в котором находится сформированный Free Pascal шаблон модуля. В новом окне редактора вводится код модуля, затем он компилируется и сохраняется, а затем уже его можно использовать повторно, путем вызова в проекте по имени в разделе uses.

Например:

unit MayUnit; // имя модуля после его сохранения

interface //описательная часть

implementation // реализация

... // код модуля

Дата добавления: 2014-12-27