- •Глава 6 Программирование в среде Delphi
- •§1. Разработка линейных программ
- •Этапы разработки программы
- •Целые типы
- •Символьный тип
- •Булевый тип
- •Переменные и константы
- •Оператор присваивания
- •Структура программы на языке Delphi
- •Некоторые функции преобразования типов
- •Среда программирования Delphi Главные составные части среды программирования
- •Структура проекта
- •Сохранение проекта
- •Структура модуля
- •Компиляция и выполнение проекта
- •§2. Стандартные и библиотечные функции в линейных программах
- •Некоторые стандартные библиотечные функции
- •Некоторые функции и процедуры даты
- •Ввод из окна ввода
- •Вывод в окно сообщения
- •Примечание
- •§ 3. Программы с разветвлениями
- •Логические выражения
- •Условный оператор
- •Оператор выбора
- •Оператор перехода
- •Компонент ListBox
- •Компонент tComboBox
- •Некоторые приемы работы с отладчиком
- •Примечание
- •§4. Циклы
- •Операторы цикла
- •Оператор цикла с параметром
- •Оператор цикла с предусловием
- •Оператор цикла с постусловием
- •Компонент Memo
- •§ 5. Использование массивов в программах, компонента Memo для ввода данных в массив
- •Массивы
- •Компонент Memo для ввода и вывода массивов
- •§ 6. Разработка многооконных проектов. Двумерные массивы. Компонент StringGrid
- •Компонент StringGrid
- •Технология создания многооконных проектов
- •Ввод и вывод двумерных массивов c помощью компонента StringGrid
- •§7. Внешние файлы
- •Процедуры работы с файлами
- •Главное меню
- •§8. Разработка внутренних процедур и функций
- •Процедуры
- •Функции
- •Литература
Оператор выбора
Оператор выбора является обобщением условного оператора и позволяет сделать выбор из произвольного числа имеющихся вариантов, то есть организовать разветвления на произвольное число направлений. Этот оператор состоит из выражения, называемого селектором, списка вариантов и необязательной ветви else, имеющей тот же смысл, что и в условном операторе.
Формат оператора выбора:
case <Выражение-селектор> of
<Список1> : <Оператор1>;
<CпиcoкN> : <OпepaтopN>
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
Главные свойства компонента TListBox
Свойство |
Назначение |
Name |
Имя компонента. В программе используется для доступа к свойствам компонента |
Items |
Элементы списка |
ItemIndex |
Номер выбранного элемента списка. Номер первого элемента списка равен нулю |
Список может быть сформирован во время создания формы или во время работы программы.
Для формирования списка во время создания формы надо в окне Инспектора Объектов (Object Inspector) выбрать свойство Items и щелкнуть на кнопке запуска редактора списка строк. В открывшемся окне String List Editor нужно набрать список, каждый элемент списка в отдельной строке. После ввода очередного элемента списка, для перехода к новой строке, необходимо нажать клавишу «ENTER». После ввода последнего элемента списка щелкнуть на кнопке OK.
Добавить элементы в список непосредственно в программе можно с помощью метода Add, например:
ListBox1.Items.Add('Россия');
ListBox1.Items.Add('Австрия');
Если ни один из элементов списка не выбран, то значение свойства ItemIndex равно –1.