Главная | Обратная связь | Поможем написать вашу работу!
МегаЛекции

Пример программного приложения




Часть 2. «Вычисление по формуле»

Цель лабораторной работы состоит в изучение технологии разработки простых программных приложений в среде Delphi, приобретении практических навыков по использованию основных компонент библиотеки визуальных компонент Delphi для конструирования оконных приложений, составление простых обработчиков событий на языке Object Pascal и их отладки в среде Delphi.

Содержание работы.

Перед выполнением лабораторной работы студент должен изучить теоретический материал об основных этапах технологии визуального проектирования и событийного программирования в Delphi.

В ходе выполнения лабораторной работы студент должен:

- изучить структуру окна Delphi, после запуска системы;

- изучить назначения следующих компонентов из библиотеки визуальных компонентов Delphi: Label, Statictext, Edit, MaskEdit, Memo, Panel, Button, BitBtn;

- изучить правила выполнения оператора присваивания и согласования типов данных при его выполнении, а также стандартных типов данных для описания целых и вещественных чисел Real, Integer, и функции преобразования символов, введенных в поля ввода, в числа (StrToInt, StrToFloat) и обратное преобразование в символы при выводе чисел (IntToStr, FloatToStr) языка Object Pascаl;

- создать форму Forml и разместить на ней компоненты для ввода исходных данных, нескольких информационных сообщений и вывода результатов вычислений:

- заголовок – «Вычисление по формуле» разместить в верхней строке формы;

- в верхней части формы разместить компонент Panel с информационным сообщением, содержащим текст задания и расчетные формулы;

- создать поля ввода данных, используя компонент Edit

- создать поле вывода результата, используя компонент Memo;

- информационные сообщения о полях ввода – вывода разместить на форме, используя компонент Label или StaticText.

- внизу формы создать панель, на которой разместить командные кнопки для активизации программы решения задачи, для очистки полей ввода – вывода перед вводом новых данных и установкой фокуса ввода в поле Edit1, и кнопку завершения работы программы, используя компоненты Button и BitBtn;

- для каждой командной кнопки на форме создать обработчик события в окне кода, разместив его в разделе Implementation – модуля Unit; перед заголовком обработчика событий процедуры поместить комментарий о его назначении и способе активизации;

- отладить программу, выполнить ее и оформить отчет.

 

Методические указания.

При запуске Delphi автоматически создается форма (Form1) и соответствующий ей программный модуль (Unit1). Изменить заголовок формы на название «Расчет по формуле» в процессе активизации программного приложения.

Компоненты, размещаемые на форме:

1) Labеl - метка используется для размещения на форме однострочных информационных сообщений. Если есть необходимость в метке Labеl поместить текст в двух и более строках необходимо для свойства AutoSize задатьзначение False, а свойству WordWrap задать значение True. Тогдапосле заполнения текущей строки происходит перенос текста на новую строку. Текст, помещаемый в свойство Caption, размещается в метке после установки выше приведенных свойств.

2) StaticText – компонент отличается от компонента Labеl наличием собственного Windows – окна, что позволяет его представить в виде вдавленной части формы. Форма рамки определяется свойством BorderStyle, принимающим одно из следующих значений:

- sbsNone - (кайма отсутствует);

- sbsSingle - (кайма представляет обычную линию);

- sbsSunken - (кайма имеет вид вдавленной области).

3) Panel – служит для объединения нескольких компонент. Содержит внутреннюю и внешние кромки, что позволяет создать эффекты вдавленности и выпуклости. Кроме того, панель вместе с другими компонентами на ней можно перетаскивать в нужное место на форме. После размещения панели на форме ее внешний вид можно настроить с помощью следующих свойств:

BevelInner и BevelOuter - задают стили оформления соответственно внутренней и внешней рамок панели, принимая одно из следующих значений:

- bvNone – рамка отсутствует;

- bvLowered – «вдавленная» рамка;

- bvRaised – «выпуклая» рамка;

- bvSpace – «плоская» рамка.

BevelWidth – определяет расстояние между внешней и внутренней рамками (в пикселях).

BorderStyle – свойство и значение его такое как и для компонента StaticText.

4) Edit – компонент используется для ввода исходных данных в одну строку с клавиатуры.

Основное свойство строки ввода Text. На этапе конструирования формы в свойство Text надо поместить пустую строчку, на этапе выполнения извлекать из него введенные значения.

По умолчанию в системе Delphi принято, что название нового объекта совпадает с его заголовком. Это название создается средой Delphi по следующему принципу. Берется название компонента (для формы это Form, для текстового поля - Edit и т.д.), и к нему добавляется порядковый номер, начиная с единицы. Если теперь на форму поместить еще одно текстовое поле, то его название будет Edit2.

В связи с тем, что исходные данные, введенные как цифры в поле Edit, воспринимаются как строка символов, то необходимо выполнить преобразование символов строки в число. Для преобразования строки в вещественное число используется функция StrToFloat, а в целое число функция StrToInt. При выводе чисел, полученных в результате вычислений, выполненных программой, используются функции обратного преобразования FloatToStr и IntToStr собственно для вещественных и целых чисел.

5) Мemo – многострочный редактор используется для вывода результата вычислений, имеет практически те же возможности по редактированию текста, что и однострочный редактор. Основные свойства компонента Мemo приведены в [5], стр. 47. Главное отличие в том, что многострочный редактор имеет несколько строк. Свойство Text компонента Мemo представляет собой строку, состоящую из находящихся в поле Мemo строк, разделенных последовательностью символов #10 и #13 (конец строки и переход на новую строку). Последовательность указанных символов добавляется в поле Мemo при нажатии клавиши «Enter».

В отличие от свойства Text, свойство Lines содержит пронумерованный список строк, начинающийся с индекса 0, а общее количество строк можно узнать с помощью метода Lines.Count.

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

-вычисление по формуле;

-очистка полей ввода и установка фокуса ввода в начальное поле ввода для ввода новых исходных данных;

-автоматическое позиционирование курсора при переходе ввода данных из одного поля в другое;

-завершение работы программы.

Основные свойства компонента Button приведены в [5], стр. 42,табл.8. Событием по умолчанию для кнопки является событие OnClick. Чтобы получить в окне формы результат выполнения программы, необходимо написать соответствующий обработчик события и включить его в модуль, созданный в окне кода.

Рекомендуется для обработчиков событий «Вычисление по формуле» и «Очистки полей» ввода-вывода на командных кнопках Button1 и Button2 изменить их название соответственно на «Вычислить» и «Очистить», используя свойство Caption на этапе создания формы.

Графическая кнопка BitBtn представляет собой разновидность кнопки Button, находится на странице Additional, ее отличительная особенность – свойство Glyph, с помощью которого определяется растровое изображение на поверхности кнопки. В комплект Delphi входит множество рисунков, разработанных специально для размещения на этих кнопках. Свойство Kind определяет одну из 11 разновидностей кнопки BitBtn, рисунки на которых приведены в приложении, рис.4, табл. 9. В свойстве Kind задается реакция кнопки на щелчок. Щелчок на любой из имеющихся кнопок с рисунком, кроме кнопок bkCustom и bkHelp, закрывает модальное окно и возвращает в программу результат вида mrXXX (bkOk-mrOk, bkCancel - mrCancel и т.д.)

При создании обработчика событий для очистки полей ввода и вывода рекомендуется применять метод SetFocus (установить фокус), который позволяет после очистки указанных полей автоматически устанавливать фокус ввода в нужное место для повторного ввода данных. Для этого в обработчике событий надо записать предложение: Edit1. SetFocus;

Курсор будет установлен в поле Edit1.

Методику создания обработчиков событий проиллюстрируем на примере создания программного приложения в Delphi для вычисления по формулам.

Пример программного приложения

Задание: Вычислить значений х и у последующим формулам:

; y=(a-b) * x

Поделиться:





Воспользуйтесь поиском по сайту:



©2015 - 2024 megalektsii.ru Все авторские права принадлежат авторам лекционных материалов. Обратная связь с нами...