Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Лабораторная работа2.doc
Скачиваний:
0
Добавлен:
01.07.2025
Размер:
288.26 Кб
Скачать

Структура модуля программного кода

Проект Delphi представляет собой набор программных единиц – модулей. Главный модуль содержит инструкции, с которых начинается выполнение программы. Главный модуль приложения формирует Delphi. Главный модуль хранится в файле с разрешением *.dpr.

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

Далее за словом uses следуют имена используемых модулей: библиотечного модуля forms и модуля формыFuntToKg1.

Выполняемая часть главного модуля находится между инструкциями begin и end

В Delphi каждой форме соответствует свой модуль. Начинается модуль со слова unit за которым следует имя модуля. Состоит модуль из трех разделов: интерфейса, реализации и инициализации.

Раздел интерфейса (начинается со слова interface). Здесь перечислены используемые модулем другие библиотечные модули и находится сформированное Delphi описание формы (типа), которое следует за словом Type.

Раздел реализации (начинается со слова implementation) содержит объявление локальных переменных, процедур и функций.

Раздел инициализации позволяет выполнить инициализацию переменных модуля. Инструкции раздела инициализации располагаются после раздела реализации между begin и end. Если раздел инициализации не содержит инструкций, то слово begin не указывается.

Порядок выполнения работы

  1. Загружаем среду программирования Delphi. Пуск ПрограммыBorland DelphiDelphi 7.

  2. Создадим форму вычисления квадрата числа

  3. На стартовой форме установим следующие свойства стартовой формы

Свойство

Значение

Свойство

Значение

1

Caption

frmФамилия

Width

330

2

Name

Задание1

4

BorderStyle

bsSingle

3

Height

250

5

Font Size

12

  1. Поместите на форму указанные на рисунке компоненты.

  1. Установите следующие свойства для этих компонентов

Свойство

Компонент;

MyButton1

MyButton2

MyButton3

MyButton4

Edit1

Edit2

Caption

Нажми меня

Считать

Сброс

Закрыть

Top

16

192

336

80

152

296

Left

200

232

240

528

136

136

Height

49

41

41

41

21

21

Width

177

145

145

145

81

81

Font

Arial жирный размер-14 цвет - черный

Свойство

Компонент;

LblPrim1

LblPrim2

LblPrim3

Caption

Число

Ответ

Top

80

152

296

Left

56

48

64

Height

13

24

24

Width

3

66

59

Font

Arial жирный размер-14 цвет - черный

  1. После оформления внешнего вида формы приступим к созданию исходного кода. Создайте обработчик события OnClick для кнопки

    • Выберите кнопку btnMyButton1 в раскрывающемся списке в верхней части окна инспектора объектов

    • Откройте инспектор объектов вкладку Events (События)

    • Выделите событие OnClick, введите в поле справа от имени события btnMyButtton и нажмите клавишу Enter или дважды щелкните мышкой. При этом становится активным окно редактора кода и Delphi автоматически создает ОБРАБОТЧИК СОБЫТИЯ – процедуру выполняющуюся при нажатии кнопки.

    • Чтобы нажатие кнопки приводило к каким-либо действиям, необходимо изменить содержимое обработчика события. Задайте изменение текста при нажатии кнопки. Для этого в окне редактора кода между Begin и End введите:

lblPrim1.Caption:='Лабораторная 2. Задание1'

  1. Аналогично программируем остальные кнопки

btnMyButton2 – код

var

a,S:real;

begin

a:= StrToFloat(Edit1.Text);

S:=sqr(a);

Edit2.Text:=FloatToStr(S);

end;

btnMyButton3 – код

Edit1.Text:= ‘ ’;

Edit2.Text:= ‘ ’;

btnMyButton3 – код

Close

  1. Еще рез запустить программу на выполнение.

  2. Сохраните проект под именем Задание1PR1

  3. Показать работу учителю

  4. Создайте форму для вычисления выражения

  5. Выполните задания своего варианта

Вариант

Задание1

Задание2

1

a≠0

b≠0

2

a≠0

b≠0

3

a≠0

b≠0

4

a≠0

b≠0

5

a≠0

b≠0

6

a≠0

b≠0

7

a≠0

b≠0

8

a≠0

b≠0

9

a≠0

b≠0

10

a≠0

b≠0

11

a≠0

b≠0

12

a≠0

b≠0

13

a≠0

b≠0

  1. Выполнение задания сохраните в свою сетевую папку по именами Задание2PR2 и Задание3PR3

  2. Проверьте работу всех объектов

  3. Покажите работу преподавателю

  4. Закройте программу и выйдите из визуальной среды

  5. Оформите отчет о лабораторной работе (в отчете должно быть: тема, цель, блок схема программы, листинг программы)