Разработка проекта ЦВЕТА В ФОРМАТЕ RGB
Постановка задачи
Создать программу, с помощью которой пользователь мог бы увидеть в зависимости от значений насыщенности красного, зеленого и синего результирующий цвет. |
Новым в этой работе являются: · полос прокрутки ScrollBar для ввода данных, · компонента Panel, · функций преобразования значений цветовых составляющих – TColorRef. |
Задание для самостоятельного выполнения, №7
Задание | Подсказка | |
Поместить на форму кнопку выхода из программы. | ||
Предусмотреть, чтобы при запуске программы были установлены начальные цвета панелей в зависимости от исходных значений ползунков. | Поместить в событие при создании формы (OnCreate для Form1) обработку значений позиции ScrollBar1, ScrollBar2 и ScrollBar3. | |
Внесите изменения так, чтобы выводились на экран значение кода цвета ни только в десятичной системе счисления, но и в шестнадцатеричной системе счисления. | Добавить объект Label4. Поместить в событие по изменению полосы прокрутки ScrollBar (RedBar) дополнительную строку, изменяющую свойство нового компонента Label4: Label4.Caption:=Format('0x%x', [RedBar.Position]); Или можно воспользоваться функцией IntToHex. |
Практическая работа №8
Разработка проекта ТЕСТ ПО ФИЗИКЕ
Постановка задачи
Создать программу, выполняющую следующие действия.
После запуска программы появляется изображение аналогичное рисунку. Пользователь, перемещаясь с помощью клавиш-стрелок по левому списку "Физических величин", выбирает любое слово, нажав клавишу Enter. |
Затем пользователь переходит в правый список "Названий физических величин" и выбирает соответствующее название ранее выбранной физической величины.
Если выбрано правильное название величины, то под словом “ОЦЕНКА” появляется одобрительная реплика: Правильно, если выбрано неправильное слово, то - Ошибка. Снова можно выбрать физическую величину и найти ей правильное название до тех пор, пока не будет найдено соответствие всех
физических величин и их названий.
Новым в этой работе является: · взаимодействие двух списков ListBox на основе свойств Items и ItemIndex, · создание многострочных надписей в компоненте Label. |
Задание для самостоятельного выполнения, №8
Задание | Подсказка | |
Списки ListBox1 и ListBox2 сделать поочередно доступными после нажатия клавиши Enter. | В Object Inspector свойству Enabled компонента ListBox2 придать значение False, а в процедуру KeyPressed, относящуюся к ListBox1, включить строки: ListBox2.Enabled := True; ListBox1.Enabled := False; Form1.ActiveControl := ListBox2; | |
Выполнить проект так, чтобы при правильном выборе названия физической величины слово в левом списке исчезало. | В процедуру KeyPressed, относящуюся к ListBox2, там, где обрабатывается правильный ответ, включить: ListBox1.Items.Delete(Num1); ListBox1.Items.Insert(Num1, ‘’); | |
Расширить количество физических величин до 10. Внести необходимые изменения в программу. |
Практическая работа №9
Разработка проекта ТЕСТ ПО ИНФОРМАТИКЕ
Постановка задачи
Создать программу, выполняющую следующие действия.
После запуска программы появляется изображение аналогичное рисунку 16. Пользователь по своему усмотрению выбирает один из переключателей в группе. В зависимости от правильности ответов появляется одно из сообщений "Плохо", "Удовлетворительно", "Хорошо", "Отлично".
Новым в этой работе являются: · группа переключателей RadioGroup на странице палитры компонентов Standard, · оператор вывода сообщений ShowMessage. |
Задание для самостоятельного выполнения, №9
Задание | Подсказка | |
Для контроля правильности работы программы вывести на панель набранную пользователем сумму баллов. | Заголовку соответствующей панели (или метки) присвоить значение IntToStr(sum). | |
Запустите программу и убедитесь, что верная сумма баллов получается лишь при последовательном выборе переключателей сначала из RadioGroup1, затем из RadioGroup2 и т.д. Если порядок нарушен, то результат может быть неверным. Чтобы этого не случилось, вставьте дополнительную кнопку и сделайте подсчет баллов только после ее нажатия | ||
Сделайте возможным повторный запуск программы. | ||
Для наглядности вывести результат разным цветом. | В оператор Case при выводе результата задать свойству Font.Color выбранный цвет. Например: Panel1.Font.Color:=clRed; | |
Усовершенствуйте программу, введя в раздел описания массив констант с номерами правильных ответов, а в программе только сравнивайте индекс переключателя со значением константы. |
Практическая работа №10