-
Основы Delphi
- Основы программирования на Delphi
- Компоненты Delphi. Начинаем писать свои первые приложения на Delphi
- Основные принципы программирования в Delphi. Начинаем программировать самостоятельно
- Delphi и Microsoft Word
- Delphi и Microsoft Excel
- Delphi и Microsoft Access
- Delphi и OpenOffice Writer
- Delphi и OpenOffice Calc
- Создание игр на Delphi
- Игра Пристрели птичку
Delphi и MSOffice
Delphi и OpenOffice
Delphi и Интернет
Delphi и игры
Delphi Android
Школа программирования Delphi
Портал DelphiSchool является бесплатным проектом, обеспечивающим пользователям быстрый и легкий доступ к урокам программирования на Delphi. Сайт позволяет научиться программировать на Делфи любому, кто хочеть писать свои программы, игры, Android приложения, программы для MAC OC или IOS. Кроме уроков Delphi и статей Delphi, на сайте доступны также и видеоуроки. Практически к каждому уроку, пользователю доступен исходник, изучив который, он сможет наглядно посмотреть как работает та или иная программа, написанная на Делфи. Кроме того мы постараемся прилагать к каждому материалу (статье, уроку, видеоуроку) файлы Delphi, которые будут помогать изучить предоставленный материал.
Каждый кто решил написать свою программу, создать свое приложение, научиться программировать и т.д., найдет на DelphiSchool статьи Delphi, уроки Delphi, видеоуроки Delphi, исходники Delphi, файлы Delphi, изучит компоненты Delphi, посмотрит Delphi примеры и многое другое абсолютно бесплатно. Все о Delphi программировании теперь собрано на одном сайте!!!
Главная » Уроки Delphi » Основы Delphi » Основы программирования на Delphi |
Мы уже ознакомились и разобрались с процедурами в Delphi, когда изучали статью Процедуры в Delphi. Пример работы с процедурами в Делфи, теперь же давайте разберемся с функциями в Delphi. Это те же процедуры, только они умеют возвращать значения. Простейшая функция выглядит так, как это показано в листинге ниже Код function MyFirstFunction1: Integer; var i:Integer; //Объявление локальной переменной begin i:=10; //Присваиваем переменной значение Result:=i; //Возвращаем значение end; Здесь объявляется функция function MyFirstFunction1: Integer, которая будет возвращать значение типа integer(целое число). Тип возвращаемого функцией значения указывается после имени и двоеточия. Для возврата значения, его нужно присвоить переменной Result, так как это делается в приведенном примере. Вызов функции осуществляется следующим образом: Код ProcedureTForm1.MyFirstFunction2; var x:Integer; begin x := MyFirstFunction1; //Вызываем функцию MyFirstFunction1, написанную ранее end; В этом примере переменной х присваивается значение, возвращаемое функцией MyFirstFunction1. Все остальные правила объявления функций такие же, как и у процедур. Теперь посмотрим,как можно передавать значения внутрь процедур и функций. Код functionMyFirstFunction1(index:Integer):Integer; begin Result:=index*2; // Возвращаем переданное значение index умноженное на 2 end; Как показано в примере, после имени функции в скобках указывается тип переменной, который можно передать внутрь ее или процедуры. В данном случае это переменная index типа integer. После скобок указывается двоеточие и тип возвращаемого значения. Здесь возвращается значение также типа integer. Что же будет возвращать наша функция? Результат ее выполнения можно записывать в Result или присваивать самому имени функции. В приведенном примере переменной Result присваивается результат вычисления выражения index*2. Эта переменная нигде не описана, но она зарезервирована как переменная, возвращающая значения из функции, и она всегда имеет тип возвращаемого значения функции. Результат можно присваивать и имени функции. Как все это будет выглядеть, показано в нижеприведенном листинге. Код function MyFirstFunction1(index:Integer):Integer; begin MyFirstFunction1:=index*2; // Возвращаю переданное значение index умноженное на 2 end; Вызов функции, определенной в предыдущем примере, будет осуществляться следующим образом Код procedure TForml.MyFirstFunction2; var x:Integer; begin x:=MyFirstFunction1(20); //Вызываем процедуру MyFirstFunction1, написанную ранее end; Здесь в функцию MyFirstFunction1 передается значение 20, а она в свою очередь вернет 20 умноженное на 2, и таким образом мы получим 40. Все рассмотренные примеры оперировали функциями. Однако точно так же можно поступать и с процедурами, передавая им значения. Процедуры и функции - это практически одно и то же. Разница только в том, что функции умеют возвращать значения. С этим мы уже знакомы из теории, но теперь увидели и на реальных примерах. | |
Добавить Функции в Delphi. Пример работы с функциями в Делфи в закладки: |
Диалоговые окна в Delphi. ShowMessage, MessageDlg, MessageDlgPos, InputBox и InputQuery |
Delphi и RadioGroup. Пример работы с группой компонентов RadioButton в Делфи |
Основы работы с MS Word. Создание, открытие, сохранение и закрытие документа Word с помощью Delphi |
Delphi и TButton. Учимся работать с кнопкой в Delphi. Часть 2. События кнопки |
Delphi и ComboBox. Пример работы с ниспадающими списками в Делфи |
Delphi и TEdit. Пример работы со строками ввода в Делфи |
Константы в Delphi. Объявление констант в Делфи |
Управление циклами в Delphi. Операторы Continue и Break. |
Delphi и CheckBox. Пример работы с CheckBox в Делфи |
Delphi и TPanel. Пример работы с панелями в Делфи |
Всего комментариев: 0 | |