Delphi - это мощный язык программирования, основанный на Object Pascal, который широко используется для создания настольных и мобильных приложений. В данной статье рассмотрим, как объявить и вызвать функцию в Delphi.
1. Объявление функции в Delphi
В Delphi функции и процедуры объявляются в секции interface или implementation модуля. Функция отличается от процедуры тем, что она возвращает значение.
Синтаксис объявления функции:
function FunctionName(Parameter1: Type1; Parameter2: Type2): ReturnType;
Пример:
function Sum(A, B: Integer): Integer;
Эта функция принимает два целочисленных параметра A и B и возвращает Integer.
2. Реализация функции
Реализация функции выполняется в секции implementation.
Пример:
function Sum(A, B: Integer): Integer; begin Result := A + B; end;
Здесь ключевое слово Result используется для возврата результата функции.
3. Вызов функции в программе
После объявления и реализации функции её можно вызывать в коде программы.
Пример вызова функции Sum:
var X, Y, Z: Integer; begin X := 10; Y := 20; Z := Sum(X, Y); ShowMessage('Сумма: ' + IntToStr(Z)); end;
Функция ShowMessage отобразит результат выполнения функции Sum в виде всплывающего окна.
4. Использование функций в классах
Функции можно объявлять внутри классов, используя модификаторы public, private, protected и published.
Пример:
type TCalculator = class public function Multiply(A, B: Integer): Integer; end;
implementation
function TCalculator.Multiply(A, B: Integer): Integer; begin Result := A * B; end;
Вызов метода класса:
var Calc: TCalculator; Res: Integer; begin Calc := TCalculator.Create; try Res := Calc.Multiply(5, 4); ShowMessage('Произведение: ' + IntToStr(Res)); finally Calc.Free; end; end;
Заключение
В Delphi объявление и вызов функций происходит по строгим правилам синтаксиса, что делает код структурированным и удобочитаемым. Использование функций позволяет повторно использовать код, улучшая его модульность и поддержку.