Контрольные вопросы

1. Что такое процедура? Как и где описывается процедура? Как вызвать процедуру?

2. Что такое функция? Как и где описывается функция? Как вызвать функцию?

3. Чем функция отличается от процедуры?

4. Какие преимущества дает использование процедур и функций?

5. Какие параметры называются фактическими?

6. Какие параметры называются формальными?

7. Механизмы передачи параметров в процедуру и функцию: по значению, по ссылке. Поясните в чем разница.

Задание для самостоятельной работы

1. Написать функцию Procent, которая возвращает процент от полученного в качестве аргумента числа.

2. Написать функцию Doxod, которая вычисляет доход по вкладу. Исход­ными данными для функции являются: величина вклада, процентная став­ка (годовых) и срок вклада(количество дней). Формула вычисления вклада может быть такой:

Доход=вклад*(проц_ставка/360*срок

3. Написать функцию, которая для веденного числа возвращает сумму его цифр.

4. Написать программный код для игры «Летающие тарелки», который определяет, было ли столкновение снаряда с летающей тарелкой, и если было, убирает тарелку с экрана и увеличивает счет игры. Оформить этот программный код в виде процедуры или функции.

Занятие12. Еще про компоненты Еще раз про списки

Как было уже рассмотрено в занятии 4, Delphi предлагает два вида списков:

• Прокручиваемый список – ListBox;

• Выпадающий список – ComboBox.

Оба вида списков располагаются на вкладке Standart. Списки имеют много общих свойств и методов, но отличаются внешним видом, кроме того, список ComboBox является полем редактирования со списком, т.е. он объединяет возможности редак­тирования и выбора из списка.

Свойство Items у обоих видов списков является объектом типа TString со своими свойствами и методами. Иными словами, Items это символьный массив с набором методов, позволяющим работать со строками списка, т.е. добавлять, удалять, вставлять строки и т.д. Набор основных методов класса TString приведен в таблице:

Метод	Описание
Add(const S: string): Integer	Добавить строку, передаваемую в качестве входного параметра, в конец списка
Insert(Index: Integer; const S: string);	Вставить строку S в позицию, задаваемую параметром Index. Нумерация строк начинается с нуля.
Delete(Index: Integer)	Удалить строку, позиция которой указана в параметре Index
Exchange(Index1, Index2: Integer)	Поменять местами два элемента списка, позиции которых указаны параметрами Index1 и Index2
Clear	Очистить список

Заполнение списков данными часто удобно производить на этапе выполнения программы программным путем.

Для демонстрации этого рассмотрим несложное приложение, назовем его «Работа со списками». Это приложение позволит программным путем изменять список ListBox. Внешний вид приложения может быть, например, таким:

ListBox1

В поле Edit1:TEdit будет вводиться значение нового элемента списка. По кнопке «Добавить» - введенный эле­мент добавляется в конец списка. По кнопке «Вставить» - элемент вставляется перед текущей позицией курсора. По кнопке «Удалить» - удаляется элемент, на котором установлен курсор. По кнопке «Очистить» - все элементы списка удаляются.

Используя методы объекта Items списка, напишем программный код на события OnClick кнопок.

Для кнопки «Добавить» программный код будет иметь вид:

ListBox1.Items.Add(Edit1.Text);

Для кнопки «Вставить» программный код будет иметь вид:

ListBox1.Items.Insert(ListBox1.ItemIndex, Edit1.Text);

Здесь первый параметр задает порядковый номер элемента, перед которым вставляется элемент, второй параметр – задает этот элемент.

Для кнопки «Удалить» программный код будет иметь вид:

ListBox1.Items.Delete(ListBox1.ItemIndex);

Для кнопки «Очистить» программный код будет иметь вид:

ListBox1.Items.Clear;