Функция с несколькими параметрами, с параметром по умолчанию.

Дата публикации

Давайте ещё не много поговорим о функциях в Delphi, а конкретно о том, как объявить и использовать функции с несколькими параметрами и с параметрами по умолчанию.

Объявление функции с несколькими параметрами.

Delphi, как и многие другие языки позволяет определить функцию с несколькими параметрами. Давайте на примере посмотрим, как это сделать. Не пытайтесь вникнуть в смысл функции, он сугубо демонстрационный.

function MyFunct(s1, s2: string; i: integer): integer;
begin
  if i mod 2 = 0 then
  begin
    ShowMessage(s1);
    ShowMessage(s2);
  end;
end;

Принцип следующий: Перечисляем все переменные с указанием типа через ";". Если у нас несколько переменных одного типа, то можно перечислить их через запятую, а потом указать общий тип. В моем примере так и сделано. Я перечислил переменные типа string, затем поставил ";" и указал, что есть ещё целочисленная переменная i.

Давайте разберемся как вызвать такую функцию:

MyFunct('Привет','Мир',1);

Функция должна могла бы вывести два сообщения.

  1. Привет
  2. Мир

Но этого не произойдет т.к. мы третим параметром передали "1", а единица не кратна двум, поэтому ничего и не выведется.

Функция Delphi с параметром по умолчанию

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

function MyFunct(s1, s2: string; i: integer=2): integer;
begin
  if i mod 2 = 0 then
  begin
    ShowMessage(s1);
    ShowMessage(s2);
  end;
end;

Такое определение позхволяет нам не передавать последний параметр. Следующие два вызова эквивалентны между собой.

MyFunct('Привет','Мир',2);
MyFunct('Привет','Мир');

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

Добавить комментарий



Обновить

Monday the 23rd. icq 486350790
Copyright 2012

©