 |
Задание для самостоятельного выполнения.
|
|
|
|
Задание для самостоятельного выполнения.
1. Сделайте так, чтобы при нажатии на кнопку «Видимый» менялся текст согласно наличию или отсутствию картинки на форме.
Подсказка. Используйте в написании кода свойство Caption.
2. Добавьте кнопку «Движение по диагонали» и пропишите код для нее.
Подсказка. Используйте свойства перемещения по вертикали и по горизонтали вместе.
Практическая работа №5 «Калькулятор».
Цель: создать программу, в которой по нажатию на кнопки будут производиться вычисления.
Ход работы:
1. Откройте новый проект.
2. Разместите на форме экземпляры компонентов: 6 кнопок Button, 3 метки Label, 3 окна редактирования Edit.
3. Переименуйте метки и кнопки согласно картинке выше и удалите весь текст в окнах редактирования.
Напоминание. У объектов Button и Label за это отвечает свойство Caption, у объекта Edit – свойство Text.
4. В окне редактора исходного кода в операторе описания переменных Var пропишите переменные a, b, c и присвойте им тип extended.
5. Выделите объект Button, который подписан как «+». Перейдите в окно редактора кода и пропишите следующий код:
a: =StrToFloat(edit1. Text);
b: =StrToFloat(edit2. Text);
c: =a+b;
edit3. Text: =FloatToStr(c);
Операция StrToFloat переводит строковый формат в вещественный. В этом коде мы присваиваем вводимым с клавиатуры исходным значениям вещественный тип данных, выполняем операцию сложение, переводим результат операции обратно в строковый тип и выводим его в третьем окне редактирования.
6. Аналогичным образом прописываем операции вычитания, деления и умножения.
При делении на ноль программа будет ломаться. Поэтому необходимо задать условие, при котором будет выводиться сообщение (showmessage) об ошибке «На ноль делить нельзя». Помните, что русскоязычный текст в программе вводится через одиночные кавычки ' '.
|
|
|
7. Выделите объект Button, который подписан как «C». Это кнопка очистки окон редактирования. Перейдите в окно редактора кода и пропишите следующий код:
Edit1. Text: =' ';
Edit2. Text: =' ';
Edit3. Text: =' ';
Объектам Edit присваивается пустое значение.
8. Пропишите код для кнопки закрытия формы.
9. Выделите форму, в свойстве Caption окна Object Inspector замените слово Form1 на «Калькулятор».
10. Сохраните проект в новой папке, запустите и протестируйте его.
Задание для самостоятельного выполнения.
Добавьте в калькулятор кнопки для вычисления квадратного корня, возведения в квадрат, нахождения Sin и Cos.
Подсказка. Таблица функций находится в конспекте.
Практическая работа №6 «Тест».
Цель: создать тестовый вопрос с выбором одного варианта ответа.
Ход работы:
1. Откройте новый проект.
2. Разместите на форме экземпляры компонентов: кнопку Button, метку Label, объект Image и объект Radiogroup.
3. Переименуйте метку и кнопку согласно картинке выше.
4. Выделите объект Image, перейдите в Object Inspector на вкладку Properties, найдите свойство Picture и загрузите картинку.
Выделите объект Radiogroup, перейдите в Object Inspector на вкладку Properties. В свойстве Caption измените его название на «Варианты ответа: ». В свойстве Items введите ваши варианты.
Обратите внимание, что каждый вариант вводится с новой строки, без запятых и точек.
5. Выделите объект Button. Перейдите в окно редактора кода и пропишите следующий код:
If radiogroup1. itemindex=-1 then
Эта строчка говорит, что не выбрано ни одного варианта.
showmessage('Выберите ответ')
else If radiogroup1. itemindex=n then
n – это номер Вашего варианта. Нумерация ведется с нулевой строки.
showmessage ('Правильно')
else showmessage ('Неправильно');
Задается условие, где может быть не выбран ни один вариант ответа, может быть выбран ошибочный, может быть выбран верный.
|
|
|
Текст, выделенный курсивом в саму программу записывать не надо! Это пояснения.
6. Выделите форму, в свойстве Caption окна Object Inspector замените слово Form1 на «Тест».
7. Сохраните проект в новой папке, запустите и протестируйте его.
|
|
|
