Цель работы - создать программу, выполняющую следующие действия:
1. После запуска программы в окне изображается три поля.
2. По щелчку мышью на кнопке «Случайный выбор» из трех слов составляется предложение случайным образом.
3. Для выхода из программы необходимо щелкнуть мышью на закрывающей кнопке в строке заголовка.
Описание плана разработки программы
1. Открыть новый проект.
2. Разместить на форме экземпляры компонентов: поле со списком ComboBox, командная кнопка Button.
3. Выполнить следующие действия:
Таблица 8.
| Выделенный объект
| Вкладка окна
Object Inspector
| Имя свойства/
имя события
| Действие
|
| Form1
| Properties
| Caption
| Установка имени формы «Сочинитель»
|
| Events
| OnCreate
| ComboBox1.ItemIndex:=0;
ComboBox2.ItemIndex:=0;
ComboBox3.ItemIndex:=0;
|
| ComboBox1
(Вкладка Standard)
| Properties
| Style
| Выберите значение cSDropDownList из раскрывающегося списка
|
| Items
| Щелкните на кнопке построителя. Откроется окно String List Editor (Редактор списка строк). Ввести пункты списка по одному в каждую строчку, завершая ввод нажатием клавиши Enter. После того как список готов, щелкнуть на кнопке OK.
|
| Продолжение таблицы 8.
|
| Выделенный объект
| Вкладка окна
Object Inspector
| Имя свойства/
имя события
| Действие
|
| ComboBox2
(Вкладка Standard)
| Properties
| Style
| Выберите значение cSDropDownList из раскрывающегося списка
|
| Items
| Щелкните на кнопке построителя. Откроется окно String List Editor (Редактор списка строк). Ввести пункты списка по одному в каждую строчку, завершая ввод нажатием клавиши Enter. После того как список готов, щелкнуть на кнопке OK.
|
| ComboBox3
(Вкладка Standard)
| Properties
| Style
| Выберите значение cSDropDownList из раскрывающегося списка
|
| Items
| Щелкните на кнопке построителя. Откроется окно String List Editor (Редактор списка строк). Ввести пункты списка по одному в каждую строчку, завершая ввод нажатием клавиши Enter. После того как список готов, щелкнуть на кнопке OK.
|
| Button1
(Вкладка Standard)
| Properties
| Caption
| Установка имени кнопки «Случайный выбор»
|
| Events
| OnClick
| ComboBox1.ItemIndex:=
Random(ComboBox1.ItemIndex.Count);
ComboBox2.ItemIndex:=
Random(ComboBox2.ItemIndex.Count);
ComboBox3.ItemIndex:=
Random(ComboBox3.ItemIndex.Count);
|
4. Сохраните проект, запустите и протестируйте его.
Таблица 9.
| Список существительных
| Список наречий
| Список действий
|
| Кошка
| Быстро
| Плавает
|
| Змея
| Высоко
| Бегает
|
| Кузнечик
| Медленно
| Летает
|
| Дельфин
| Сильно
| Ползает
|
| Черепаха
| Хорошо
| Прыгает
|
| Ласточка
| Плохо
| Прячется
|
