Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Проект2.rtf
Скачиваний:
18
Добавлен:
11.04.2015
Размер:
4.5 Mб
Скачать

12. Измените подписи Caption на объектах типа RadioButton, Label и Button так, как показано на рис.

Для этого поочередно выбирайте объекты (щелкайте на них) меняйте значения свойства Caption.

13. Задайте одинаковые размеры для всех текстовых полей, полей редактирования и кнопок и выровняйте их на форме.

Для этого одновременно выделите пять объектов в левом столбце одним из способов:

• удерживая нажатой клавишу Shift, поочередно активизируйте объекты, щелкая на них левой клавишей мыши;

• обведите вокруг этих объектов контур, удерживая нажатой левую клавишу мыши.

В окне Object Inspector задайте общие для этих объектов значения в пикселях свойств Width (ширина), Height (высота) и Left (отступ от левой границы окна). После выбора некоторого свойства группы объектов его значением является значения соответствующего свойства первого объекта в группе. Можете изменить стиль, цвет или размер шрифта одновременно для всех выделенных объектов (свойство Font). Снять выделение можно, щелкнув на свободном месте формы. Аналогично выполняется выравнивание правого столбца объектов.

Выровняйте вставленные поля попарно в горизонтальном направлении. Для этого поменяйте значение свойства Тор (отступ от верхней границы окна в пикселях) для соответствующих групп объектов. Сохраните работу (Save A11).

14. Задайте значения курсов купли-продажи валюты, а также, сколько валюты покупает или продает.

Для этого задайте значение свойства Text объекта Editl, например, 5.25. Повторите это для объекта Edit2 (значение 5.45) и Edit3 (20).

15. Очистите поле редактирования Edit4.

Для этого удалите значение свойства Text объекта Edit4. Не путайте значения свойств Name и Text этих объектов.

16. Заблокируйте возможность ввода данных для поля Edit4, поскольку в это поле будет выводиться результат.

Для этого задайте значение свойства Enabled (доступность) — False. Изменять значение определенного свойства можно, дважды щелкнув на нём левой клавишей мыши. Сохраните работу (Save A11). Выполните программу и убедитесь, что нельзя ввести или редактировать данные в поле Edit4.

17. Запрограммируйте радиокнопки так, чтобы направление стрелки менялось и указывало на вид операции: купля или продажа. Сделайте активным поле Edit3.

Щелкните дважды на правом переключателе RadioButton2 (Продажа). Получите заготовку процедуры RadioButton2Click. В теле этой процедуры опишите действия, которые должны быть выполнены в результате щелчка на правом переключателе RadioButton2:

procedure TForml.RadioButton2Click(Sender: Tobject);

begin

{Меняем направление стрелки}

Label3.Caption := '=>';

Edit3.SetFocus {Активизируем поле Edit3}

end;

Аналогично запрограммируйте событие Click для переключателя RadioButtonl. Учтите, что стрелка должна показывать на левое поле ('<=').

Фрагмент программного кода созданной процедуры запишите в отчет.

18. Запустите программу и убедитесь, что переключатели выполняют предписанные им функции.

19. Запрограммируйте кнопку «Выход».

Воспользуйтесь процедурой закрытия окна программы Close:

procedure TForml.Button2Click(Sender: TObject);

begin

Close ; {Закрываем окно программы}

end;