Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Пособие по Delphi.doc
Скачиваний:
7
Добавлен:
22.08.2019
Размер:
3.21 Mб
Скачать

Оператор выбора

Оператор выбора является обобщением условного оператора и позволяет сделать выбор из произвольного числа имеющихся вариантов, то есть организовать разветвления на произвольное число направлений. Этот оператор состоит из выражения, называемого селектором, списка вариантов и необязательной ветви else, имеющей тот же смысл, что и в условном операторе.

Формат оператора выбора:

case <Выражение-селектор> of

<Список1> : <Оператор1>;

<CnncoKN> : <OnepaTopN>

else <Оператор>;

end;

Выражение–селектор должно быть порядкового типа. Каждый вариант представляет собой список констант, отделенных двоеточием от относящегося к данному варианту оператора, возможно, составного. Список констант выбора состоит из произвольного количества значений и диапазонов, отделенных друг от друга запятыми. Границы диапазона записываются двумя константами через разделитель " . . " . Тип констант должен совпадать с типом выражения–селектора.

Оператор выбора выполняется следующим образом:

— вычисляется значение выражения селектора;

— производится последовательный просмотр вариантов на предмет совпадения значения селектора с константами и значениями из диапазонов соответствующего списка;

— если для очередного варианта этот поиск успешный, то выполняется оператор этого варианта. После этого выполнение оператора выбора заканчивается;

— если все проверки оказались безуспешными, то выполняется оператор, стоящий после слова else (при его наличии).

Пример. Оператор выбора.

case DayNumber of

1 .. 5 : strDay := 'Рабочий день';

6, 7 : strDay := 'Выходной день'

else strDay := '';

end;

В зависимости от значения целочисленной переменной DayNumber, содержащей номер дня недели, присваивается соответствующее значение строковой переменной strDay.

Оператор перехода

Оператор безусловного перехода осуществляет переход на оператор, помеченный меткой. Формат оператора перехода следующий:

Goto метка, где метка ― это идентификатор, находящийся перед оператором, который должен быть выполнен после оператора Goto.

Метка должна быть описана в разделе label, который располагается перед разделом описания переменных.

Например,

Label NNN, 123,G12;

…….

NNN: A:=D/S;

….

Goto NNN;

Замечание

Современный стиль программирования предполагает составление программ без использования оператора Goto.

Компонент ListBox

ListBox (список) нужен для показа прокручиваемого списка. Классический пример ListBox’а в среде Windows — выбор файла из списка в пункте меню File | Open многих приложений. Названия файлов или директорий находятся в ListBox’е.

Главные свойства компонента ListBox

Свойство

Назначение

Name

Имя компонента. В программе используется для доступа к свойствам компонента

Items

Элементы списка

ItemIndex

Номер выбранного элемента списка. Номер первого элемента списка равен нулю

Список может быть сформирован во время создания формы или во время работы программы.

Для формирования списка во время создания формы надо в окне Инспектора Объектов (Object Inspector) выбрать свойство Items и щелкнуть на кнопке запуска редактора списка строк. В открывшемся окне String List Editor нужно набрать список, каждый элемент списка в отдельной строке. После ввода очередного элемента списка, для перехода к новой строке, необходимо нажать клавишу ENTER. После ввода последнего элемента списка щелкнуть на кнопке OK.

Добавить элементы в список непосредственно в программе можно с помощью метод Add, например:

ListBox1.Items.Add('Россия');

ListBox1.Items.Add('Австрия');

Если ни один из элементов списка не выбран, то значение свойства ItemIndex равно минус единице.