Лабораторный практикум


Рис. 20. Вид окна приложения 15. После проверки работы приложения закройте его окно. Дополнительное задание 1



бет6/27
Дата07.10.2022
өлшемі2,64 Mb.
#152136
түріЛабораторная работа
1   2   3   4   5   6   7   8   9   ...   27
Байланысты:
Delphi задачи
диплом 20, диплом 20, диплом 20, Абай өлеңі, азия, Ақыл ой жан қуаты, Тест cұрақтары ББ IT қолдану Студентке, кіріспе практика, кіріспе практика, кіріспе практика, кіріспе практика, кіріспе практика, кіріспе практика, кіріспе практика, Резюме
Рис. 20. Вид окна приложения
15. После проверки работы приложения закройте его окно.
Дополнительное задание 1.
Измените приложение таким образом, чтобы выполнялась операция вычитания.

Лабораторная работа №2


Создайте приложение, реализующее ввод двух целых чисел, по щелчку на кнопке с символом «=» вычисляющее результат операции вещественного деления и выводящее значение результата на экран.



Окно приложения, выполняющего операцию вещественного деления




Алгоритм выполнения работы


1. Запустите ИСР Delphi и создайте новый проект командой Файл ► Создать ► Приложение. В результате создания проекта в окне Delphi будет раскрыто окно формы, на которой вы будете размещать визуальные компоненты проекта. Сохраните новый проект при помощи команды Файл ► Сохранить проект Как. В окне Сохранить Как создайте новую папку для файлов создаваемого проекта, например, «Вещественное деление». Затем в окне Сохранить Как откройте созданную папку, задайте в поле Имя файла имя main и щелкните на кнопке Сохранить. После сохранения файла модуля main.pas откроется окно Сохранить проект Как, в котором следует задать имя файла проекта, например, delenie, а затем нажать кнопку Сохранить.


2. Измените свойства формы. Для изменения размеров формы захватите угол окна формы и, не отпуская левую кнопку мыши, перемещайте мышь, задавая требуемый размер формы.

3. Измените надпись в заголовке формы Form1 с помощью Инспектора объектов. Для этого в окне Инспектора объектов выберите объект Form1, откройте страницу Свойства, затем выберите свойство Caption (Заголовок) и задайте новое значение этого свойства, например, «Вещественное деление двух целых чисел».




4. Разместите на форме компоненты Edit1, Edit2, Edit3, Label1, Label2, Label3, Label4 и Button1, как показано на рис. 22.

5. Удалите текст Edit1, Edit2, Edit3 из соответствующих компонентов, для чего выберите объект в окне Инспектора объектов, на странице Properties выберите свойство Text .




6. Задайте для свойства Caption компонента Label1 значение «/».


7. Измените размер символов компонента Label1, для чего в окне Инспектора объектов выберите в списке объект Label1, затем на странице Свойства разверните список свойств Font.
В списке свойств Font выберите свойство Size и задайте для него значение 20, как показано на рис. 16. Аналогичным образом задайте для свойства Caption компонента Button1 значение «=» и размер символов 20.

8. Задайте для свойства Caption компонента Label2 значение «Делимое», для Label3 — «Делитель», для Label4 — «Частное».




9. Зафиксируйте положение компонентов на форме, выбрав команду Правка ►Зафиксировать.


После редактирования свойств визуальных компонентов форма приложения будет выглядеть следующим образом:



Рис. 22. Вид формы приложения с визуальными компонентами


10. Нажав F12, откройте окно Редактора кода и просмотрите текст модуля, сгенерированный Delphi в процессе визуального проектирования формы. Обратите внимание, что в тексте программы еще не описаны переменные и нет процедуры вычисления операции вещественного деления.


11. Чтобы приложение выполняло вычисления при щелчке мышью на кнопке Button1 с изображением символа «=», следует написать код обработки этого события. Для создания кода обработчика события следует воспользоваться помощью Инспектора объектов. Выберите в его окне объект Button 1, затем на странице События дважды щелкните мышью на пустом поле списка в событии OnClick. После этого окно Редактора кода немедленно получит фокус, в котором в разделе interface появится запись процедуры обработчика события:
procedure TForm1.Button1Click(Sender: TObject);


В разделе implementation появится текст заготовки этой процедуры:
procedure TForm1.Button1Click(Sender: TObject);
begin
...
end;


Курсор будет расположен в пустой строке между ключевыми словами begin и end. Этот код является заготовкой обработчика события, которое будет выполняться при щелчке мышью на кнопке Button1. Остается только разместить в промежутке между begin и end необходимые операторы. Так как в задаче необходимо выполнить деление двух целых чисел, а результат их вещественного деления всегда будет вещественным числом, то в разделе описания переменных следует ввести следующее описание:


Достарыңызбен бөлісу:
1   2   3   4   5   6   7   8   9   ...   27




©engime.org 2024
әкімшілігінің қараңыз

    Басты бет