Функции служат для тех же целей, что и процедуры, — выполняют ряд действий.
Но функции могут возвращать значение.
Листинг 6.3
function TForml.TwentyFive: Integer;
begin
TwentyFive := 25;
end;
Здесь функция с именем TwentyFive возвращает значение типа Integer и всегда
возвращает число 25. Она практически бесполезная, и приведена лишь для того,
чтобы показать, как использовать функции в Delphi. Вызвать функцию из другой
функции или процедуры можно так:
total := TwentyFive;
При этом выполнится функция TwentyFive и возвращенное значение присвоится
переменной total. Функции могут и не возвращать значение. Тогда они работают
точно так же, как процедуры:
function TForml.SomeActions;
Как видите, функция, не возвращающая значение, даже записывается так же, как
процедура, различие лишь в названии — function.