Разработка проекта ЦВЕТА В ФОРМАТЕ 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