3. Вставьте в форму два объекта типа RadioButton (переключатель), как показано на рис. 7.
Для этого щелкните на пиктограмме Ш объекта типа RadioButton (переключатель), которая находится на закладке Standard палитры компонентов главного окна Delphi. После этого щелкните в точке вставки на форме. Повторите эти действия, чтобы вставить вторую радиокнопку.
4. Задайте начальное значение второго переключателя как активное.
Для этого щелкните на правом переключателе и задайте значение его свойства Checked (контроль выбора) - True.
5. Вставьте в форму два поля редактирования — объекты Editl и Edit2.
Для этого щелкните па пиктограмме объекта типа Edit (редактирование), которая находится на закладке Standard палитры компонентов, а потом щелкните в нужном месте на форме. Вставьте второй объект (рис. 7). Запустите программу и поупражняйтесь со вставленными объектами: щелкните в поле редактирования, введите некоторое число, удалите его. Закройте окно программы.
Разместите на форме два текстовых поля — объекты Labell и Label2 (рис. 7).
Вставьте в форму два поля редактирования — объекты Edit3 и Edit4 (рис. 7).
Вставьте две кнопки — объекты типа Button (рис. 7).
Вставьте в форму еще два текстовых поля — объекты Label3 и Label4 (рис. 7).
Рис. 7
10. Сохраните созданную на данный момент форму в своей папке.
File => Save All. Файлы текста программы и проекта назовите разными именами. Имена запишите в отчет. В дальнейшем периодически, в частности перед очередными запусками проекта на
выполнение, сохраняйте файлы программы (File => Save All, вводить имена файлов уже не нужно).
11. Поменяйте название формы с «Forml» на «Обмен валюты».
Для этого замените значения свойства Caption формы. Щелкните на свойстве Caption окна Object Inspector. Введите название формы без кавычек. Обратите внимание на то, что для объектов многих типов (в частности, Label, Button, Form, RadioButton, CheckBox и других) значения свойств Caption и Name совпадают.
12. Измените подписи Caption на объектах типа RadioButton, Label и Button так, как показано на рис. 8.
Для этого поочередно выбирайте объекты (щелкайте на них) и меняйте значения свойства Caption.
Рис. 8
13. Задайте одинаковые размеры для всех текстовых полей, полей редактирования и кнопок и выровняйте их на форме.
Для этого одновременно выделите пять объектов в левом столбце одним из способов:
удерживая нажатой клавишу Shift, поочередно активизируйте объекты, щелкая на них левой клавишей мыши;
обведите вокруг этих объектов контур, удерживая нажатой левую клавишу мыши.
В окне Object Inspector задайте общие для этих объектов значения в пикселях свойств Width (ширина), Height (высота) и Left (отступ от левой границы окна). После выбора некоторого свойства группы объектов его значением является значения соответствующего свойства первого объекта в группе. Можете изменить стиль, цвет или размер шрифта одновременно для всех выделенных объектов (свойство Font). Снять выделение можно, щелкнув на свободном месте формы. Аналогично выполняется выравнивание правого столбца объектов.
Выровняйте вставленные поля попарно в горизонтальном направлении. Для этого поменяйте значение свойства Тор (отступ от верхней границы окна в пикселях) для соответствующих групп объектов. Сохраните работу (Save All).
14. Задайте значения курсов купли-продажи валюты, а также сколько валюты кантор покупает или продает.
Для этого задайте значение свойства Text объекта Editl, например, 5.25. Повторите это для объекта Edit2 (значение 5.45) и Edit3 (20).
15. Очистите поле редактирования Edit4.
Для этого удалите значение свойства Text объекта Edit4. Не путайте значения свойств Name и Text этих объектов.
16. Заблокируйте возможность ввода данных для поля Edit4, поскольку в это поле будет выводиться результат.
Для этого задайте значение свойства Enabled (доступность) -False. Изменять значение определенного свойства можно, дважды щелкнув на нём левой клавишей мыши. Сохраните работу (Save All). Выполните программу и убедитесь, что нельзя ввести или редактировать данные в поле Edit4.
17. Запрограммируйте радиокнопки так, чтобы направление стрелки менялось и указывало на вид операции: купля или продажа. Сделайте активным поле Edit3.
Щелкните дважды на правом переключателе RadioButton2 (Продажа). Получите заготовку процедуры RadioButton2Click. В теле этой процедуры опишите действия, которые должны быть выполнены в результате щелчка на правом переключателе RadioButton2:
procedure TForml.RadioButton.2Click(Sender: Tobject); begin
{Меняем направление стрелки) Label3.Caption := '=>';
Edit3.SetFocus {Активизируем поле Edit3) end;
Аналогично запрограммируйте событие Click для переключателя RadioButtonl. Учтите, что стрелка должна показывать на левое поле ('<=').
Фрагмент программного кода созданной процедуры, запишите в отчет.