Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Лабораторна робота №9 17.09.docx
Скачиваний:
2
Добавлен:
13.11.2019
Размер:
402.83 Кб
Скачать
  1. Запустите программу и убедитесь, что переключатель выполняет свои функции согласно п.17.

  2. Запрограммируйте кнопку «Конец».

Void_fastcallTForm::Button2Click(TObject*Sender)

{

exit(1); //Заканчиваем работу программы

}

  1. Запрограммируйте кнопку «Вычислить».

Данное в поле редактирования – это значение свойства Text объекта типа строка. Для преобразования этого данного в числовой действительный тип Float воспользуйтесь функцией StrToFloat(), а на оборот – функцией FloatToStr(). Опишите основные (kurs, suma), и дополнительные (cod,ed) переменные.

Void_fastcallTFort::Button1Click(TObject*Sender)

{

floatf1=StrToFloat(Edit1->Text);//Получим значение курса покупки

floatf2=StrToFloat(Edit2->Text);//Получим значение курса продажи

floatf3=StrToFloat(Edit3->Text);//Получим числовое значение суммы в USD

floatf4; //Изменение для суммы в гривнах

if (RadioButton1->Cheched)f4=f1*f3;

else f4=f2*f3;

Edit4->Text=FloatToStr(f4);

//Полученное число суммы в гривнах преобразуем в текстовый формат и результат присвоим свойству Text поля Edit4.

  1. Сохраните работу (Save All).

  2. Выполните программу и поэкспериментируйте с различными денежными суммами и операциями купли или продажи. Закройте окно программы «Обмен валют».

  3. Измените размеры и цвета символов, размещение объектов, фон формы так, чтобы форма выглядела наилучшим образом.

  4. Обеспечьте появление подсказки «Введите сумму в долларах» после перемещения указателя мыши к полю Edit3.

Выберите объект Edit3 и установите свойство ShoeHint в True, а как значение свойства Hint введите текст подсказки.

  1. Поменяйте внешний вид стрелки с =>на , а <= на .

Для этого выберите объект Label3 и как значение свойства Caption введите русскую букву Р, после чего, активизировав свойство Font, выберите название шрифта Wingdings. Дважды щелкните на правом переключателе и в его функции введите русскую букву Р вместо =>.В функции для левого пе6реключателя символы <=замените буквой п. Сохраните работу, запустите программу и убедитесь, что стрелка изменила свой вид.

  1. Создайте exe файл вашей программы.

  2. Закройте С++Builder, запустите созданную программу и выполните вычисления для различных начальных данных

  3. Продемонстрируйте созданную форму преподавателю. Задания

  1. Предусмотреть в созданной программе ещё одну кнопку для очистки полей денежных сумм. Выполните программу и убедитесь в правильности ее работы. Подсказка: для объектов Edit3, Edit4 у функции обработки события нажатие на эту кнопку используйте команду присвоения их свойствам Text пустой строки.

  2. Обеспечьте появление подсказки «Введите курс покупки» и «Ведите курс продаж» после перемещения указателя мыши к полям Edit1и Edit2 соответственно.

  3. Модифицируйте программу, предусмотрев дополнительную возможность изменения типа операции (покупка, продажа) вследствие щелканья мышью по стрелке. Выполните программу. Подсказка: для этого дважды щелкните по текстовому полю стрелки. Откроется окно программного кода с заготовкой функции Label3Click. В теле этой функции можно воспользоваться командами вида: if(RadioButton1.Checked=True)

…//Устанавливаем переключатель в правое положение, изменяя

//значение свойства Checked объекта RadioButton2

else

…//Устанавливаем переключатель в левое положение, изменяя

//значение свойства Checked объекта RadioButton1

  1. Упростите форму и измените кнопки «Вычислить» так, чтобы ее можно было использовать для переведения миль в километры или наоборот в зависимости от положения переключателя (1 миля=1,609344 км).

  2. В созданную для задачи п.4. форму вставьте группу переключателей (объект RadioGroup) для выбора типа мили с двух возможных значений: морской и обычной мили (1 морскаяя миля=1,852 км).

Подсказка: для задания подписи к переключателям используйте свойство Items групі переключателей RadioGroup, а для контроля выбора определенного переключателя используйтесь свойство ItemIndex (равно –1, если ни один не выбран, 0 – если выбрано первый переключатель групы, 1 – если второй и т.д.)