Как создать свою функцию (Delphi)
Так как этим вопросом меня попросту засыпали — я напишу эту статью. Итак зачем нужны функции? Чтобы часть кода выместить в отдельный блок текста и выполнять этот блок лишь вызовом одной команды — вызовом функции.
Давайте запишем в исходном коде вашей проги после слова implementation такой текст:
1 2 3 4 | function sum(a, b: integer): integer; begin sum:=a+b; end; |
Поздравляю, вы создали свою функцию!
Теперь в любом месте программы ее можно вызвать примерно вот так:
1 | i:=sum(5,10); |
В результате выполнения этой строки в переменной i будет значение 15
Теперь подробнее разберем процесс создания функции. У каждой функции есть возвращаемое значение, оно может быть разных типов логическим, строковым, числовым и любым другим. Заполнение результата выполнения функции у нас происходит за счет присвоения значения названию функции — sum:=a+b;
В функцию передаются параметры(или так называемые операнды), в нашем случае это переменные a и b типа integer. Это могут быть переменные любого типа — такого который сочтёте необходимым передавать в функцию.
В теле функции — между begin и end могут находиться любые команды которые вам будет удобно выместить в эту функцию.
Есть еще схожее понятие — процедура. Описывается вот так
1 2 3 4 | procedure sum(a, b: integer); begin //какието действия end; |
В отличии от функции она не возвращает никакого значения, а просто выполняет те действия которые находятся внутри неё.
Понравилась статья? Жми: | Поделиться в соц. сетях |