Методы

Функция определяется ключевым словом function:

<функция> = function <имя-функции> ( <параметры> ) : <тип>; deprecated [<deprecated-message>];

Процедура определяется ключевым словом procedure:

<процедура> = procedure <имя-процедуры> ( <параметры> ); deprecated [<deprecated-message>];

<параметры> - список передаваемых параметров:

<параметр> = [<квалификатор-параметра>] <имя-параметра> : <тип-параметра>

<квалификатор-параметра> - помечает специальный вид параметра:

<квалификатор-параметра> = var | out

var - параметр передается по ссылке, а не по значению.

out - параметр предназначен для возврата значения в точку вызова через параметр. Если параметру с квалификатором out в теле метода не будет присвоено значение, компилятор выдаст предупреждение. Квалификатор доступен начиная с Атлантис 5.4.17.

<имя-параметра> - идентификатор.

<тип-параметра> - тип параметра.

<тип> - тип возвращаемого значения.

Ключевое слово deprecated позволяет пометить метод как устаревший (не рекомендуемый для использования). При попытке использовать такой метод будет выдаваться предупреждение на этапе компиляции исходного текста программы. Ключевое слово deprecated введено начиная с Атлантис 5.4.17.

<deprecated-message> - текст сообщения, выводимого компилятором при попытке использовать данный метод. Если не задан, выдается стандартное предупреждение. Доступно начиная с Атлантис 5.4.17.

Примеры

Пример 1. Использование deprecated

function ff1 : word; deprecated 'Вместо ff1 использовать ff3';
function ff2 : word; deprecated;
function ff3: word;
procedure pp1; deprecated ''Вместо pp1 использовать pp3';
procedure pp2; deprecated;
procedure pp3;

Пример 2. Использование out

function F1 (out p : word) : word;
{
  result := p;
}
procedure P1 (out p : word);
{
  p := 1;
}

Версия

Ключевые слова deprecated и out введены начиная с Атлантис 5.4.17.