Процедуры и функции.

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

Заголовок состоит из первого слова procudure для процедуры и function для функции. После этого слова следует идентификатор, по которому данная процедура или функция будет вызываться из другого места программы (возможно даже из этой же процедуры). После идентификатора могут следовать в скобках входящие или выходящие параметры. Заголовок функции завершается описанием ее типа.

После заголовка может следовать (по необходимости) описание внутренних типов, констант, переменных, меток. На эта тема будет описана позже.

Далее следует сам программный блок процедуры или функции, заключенный в операторные скобки begin и end.

Пример процедуры:

// заголовок процедуры. InData — вносимый параметр

procedure MyProcedure (InData: Integer);

Var i1,i2,i3: Integer; // описание переменных в данной процедуре

begin

// текст программы

end;

Функция от процедуры отличается только тем, что кроме выполняемого программного блока может возвращать определенное значение (по окончанию сама принимает некоторое значение).

Пример функции:

function MyFunction (InData: Integer): Integer; // возвращаемый тип данных – Integer

Var i1,i2,i3: Integer;

begin

// текст программы

Result:= 1; // возвращаемое значение

end;

Для осмысления вышесказанного рассмотрим следующий пример.

function MyFunction (x: String): String;

begin

Result:= x+'рамма';

end;

procedure MyProcedure;

begin

ShowMessage(MyFunction('прог'));

end;

Допустим мы имеем некий программный код, который в определенный момент вызывает на выполнение процедуру MyProcedure. Порядок выполнения программы можно расписать следующим образом.

1. Вход в процедуру MyProcedure.

2. Вызывается функция MyFunction и управление передается в нее. При этом туда передается строковый параметр "прог".

3. В функции выполняется арифметическая операция со строкой. К вносимому параметру прибавляется строка "рамма" и все это передается в качестве возвращаемого параметра функции Result.

4. Возвращение в процедуру MyProcedure. Теперь MyFunction принимает значение "программа" и это значение передается в качестве параметра в процедуру ShowMessage.

5. Процедура ShowMessage является стандартной (она описана в стандартном модуле, автоматически подключаемом изначально). Эта процедура производит вывод окошка с сообщением и кнопкой Ok.

6. После вывода окошка с текстом "программа" текущая позиция выполнения программы выходит из процедуры MyProcedure в то место, откуда она была вызвана.

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

Переменные.

Как уже говорилось, для того, чтобы вам легче было изучать язык программирования Object Pascal, необходимы некоторые азы знания языка Pascal. Потребуются только поверхностные знания синтаксиса, основных операторов, типов данных. Не отходя далеко от нашего сайта вы сможете изучить и этот язык в разделе "Программирование на языке Pascal".

Но тем не менее мы с вами постепенно просматриваем общие правила, так сказать азы, чтобы дальше углубляться без вопросов в более сложный материал. Перед вами последний ознакомительный урок с языком Pascal, после чего мы будем углубляться в сам Delphi.

Как уже говорилось ранее, переменные — это некоторая область в памяти, хранящая данные. Перед использованием переменной необходимо указать ее тип, и при необходимости размер. Места, где объявляются переменные, мы уже немного рассматривали в примерах.