Пример программного приложения
Стр 1 из 2Следующая ⇒ Часть 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 Все авторские права принадлежат авторам лекционных материалов. Обратная связь с нами...
|