Курсовая работа Гид по красоте Delphi7. курсовой проект. Курсовая работа по учебной дисциплине оп. 04 Основы алгоритмизации и программирования
 Скачать 1.9 Mb.
|
|
Министерство сельского хозяйства Ставропольского края ФГБОУ ВО СТАВРОПОЛЬСКИЙ ГОСУДАРСТВЕННЫЙ АГРАРНЫЙ УНИВЕРСИТЕТ КУРСОВАЯ РАБОТА по учебной дисциплине ОП.04 Основы алгоритмизации и программирования на тему Разработка приложения "Гид по красоте" Выполнил Обучающийся 2 курса группы 19ИСИП9-1 Специальность 09.02.07. Информационные системы и программирование Код и название Маликова Анастасия Владимировна Ф.И.О. обучающегося (в им.падеже) Руководитель: преподаватель учебно-методического отдела ФСПО Скорочкина Анастасия Викторовна Ф.И.О. (полностью) Оценка: _______________________________ ______________________________________ подпись Ставрополь, 2020 Аннотация Курсовой проект изложен на 22-х страницах печатного текста, состоит из введения, двух глав, заключения, содержит приложение и список использованных источников, включающий в себя 15 наименований. Во введении обоснована актуальность темы, сформулированы цели, задачи исследования. В представленной работе описаны все этапы создания программы, алгоритм ее функционирования, структура программы, описание программных модулей, интерфейс программы, тестирование готового программного продукта. В заключении подведен итог результатов исследования, сделаны выводы и разработано приложение. Содержание Введение……………………………………………………………………4 1.Теоретическая часть 1.1Анализ предметной области……………………………………..7 1.2 Формализация и обоснование алгоритма решения задачи……8 1.3 Выбор и описание функциональных модулей ………………..10 1.4 Выбор и описание инструментальных средств ……………….11 2.Практическая часть 2.1 Создание пользовательского интерфейса……………………..13 2.2 Реализация программного продукта на языке программирования………………………………………………………..19 2.3 Разработка руководства пользователя………………………...23 Заключение………………………………………………………………..25 Список использованных источников……………………………………26 Приложение……………………………………………………………….27 ВВЕДЕНИЕ В настоящее время проблема создания приложений и внедрение их в повседневную жизнь очень актуальна. Так, например, создание программ внесения оплаты за различные услуги через терминалы. В каждом офисе есть ПК со специальными приложениями для работы. С помощью приложений ведется производство сложной техники на предприятиях, автоматизация производств. Приложения используются в электро–технических приборах домашнего пользования: калькуляторы, стиральные машины, видеокамеры, фотоаппараты и др., следовательно, для движения прогресса и внедрения, разработки новых технологий нужны программисты. Программирование одна из самых сложных наук, и объем информации, усваиваемой программистом очень сложно запомнить. Для помощи программистам создаются и разрабатываться приложения, ориентированные на задачи программистов. Они помогают облегчить жизнь начинающему программисту и сэкономить время более опытному программисту; исключают поиск нужной справочной информации в интернете и библиотеках, обеспечивая нужными данными прямо на рабочем месте. Время - главный фактор в работе программиста, от которого зависит заработная плата. Иногда сроки на написание программы очень сжаты, и это не позволяет тратить много времени на поиск информации в книгах и справочниках. Можно использовать поиск в интернете, но еще более упрощает работу программиста справочное приложение. Так же, как и при помощи интернета, программист может найти информацию, не отходя от рабочего места. Преимущество приложения перед интернетом в том, что оно исключает «копание» по сайтам, попадание спама и вирусов в ПК. А попадания вирусов в компьютер может привести к самым нежелательным последствиям. Тема курсового проекта – создание программы гида-справочника по красоте. Эта программа должна быть простой в обращение и удобной для использования при разработке других приложений. Это приложение станет Вашим личным бьюти-гидом, содержащим всевозможные секреты красоты, с которым Вы сможете подобрать индивидуальный уход за лицом на каждый день, узнать или заново открыть секреты красоты и правила ухода за кожей и телом, определиться с выбором средств, подходящих именно Вам. Актуальность выбранной темы курсовой работы - культура человеческого тела и ухода за ним является одним из важных элементов общечеловеческой культуры. Современный человек одержим красотой. Определенным критериям и стандартам красоты начинают следовать с самого раннего возраста. Люди тратят много времени и денег на посещение салонов красоты, фитнес центров. Для многих становится нормой ежемесячно, а, то и чаще, расходовать денежные средства на уход за собой, на такие услуги как маникюр, педикюр, окрашивание и укладка волос, спа-процедуры и другие. В настоящее время считается модным, актуальным, а для некоторых просто необходимым посещение фитнес центров, дополнительные тренировки с персональным тренером, специальное питание. Газетные киоски завалены модными журналами, которые информируют читателей о последних модных тенденциях предстоящего сезона, о правильном уходе за лицом и телом, о методах преображения своей внешности. В разных городах все время открываются салоны красоты и фитнес-клубы. Можно сказать, что сейчас сфера «создания красоты» развивается очень быстрыми темпами и является одной из самых перспективных сфер экономики. Услугами индустрии красоты в той или иной мере пользуется большая часть населения. В наше время привлекательный внешний вид — необходимый атрибут каждого успешного человека. На региональном уровне развитие индустрии красоты содействует гармоничному развитию региона: решению социальных вопросов, в том числе повышению занятости населения и улучшению его благосостояния, становлению и развитию малого бизнеса, повышению качества жизни граждан, обеспечению большей доступности потребительских товаров и услуг для населения. Цель исследования - создать приложение для автоматизации изучения или же углубления знаний о сфере красоты и здоровья. Для реализации поставленной цели необходимо решить ряд следующих задач: 1.Изучить литературу по выбранной теме. 2. Провести анализ предметной области и определить основной круг пользователей. 3.Создать функциональные модули и выбрать инструментальные средства разработки программного продукта. 4.Разработать программный продукт и создать руководство пользователя. Объектом исследования в работе выступает сфера красоты и здоровья. Предметом исследования - советы по уходу за лицом и телом. ТЕОРЕТИЧЕСКАЯ ЧАСТЬ 1.1Анализ предметной области Каждая женщина хочет быть красивой и иметь здоровую кожу. Многие готовы платить за это большие деньги. Однако результат от применения косметических средств зависит не от количества потраченных на них денег, и не от красноречия консультанта, а от того, насколько они эффективны и насколько правильно они подобраны. И вот здесь, решающее значение приобретает качество информации – из надежного ли источника были получены те факты, с помощью которых вас убедили купить этот крем и не были ли они перевернуты с ног на голову? Хорошо выглядеть - значит ежедневно ухаживать за собой. Это наш собственный самый приятный женский труд, который дарит минуты отдыха, и минуты удовольствия, когда слышишь комплимент. Каждая девушка стремится выглядеть красиво. А то, как мы выглядим, в первую очередь зависит от состояния нашей кожи. Уход за кожей - это обязательный ритуал, который надо соблюдать неукоснительно: утром и вечером, в будни и в праздники, без выходных и каникул. Данное приложение будет ориентировано на женщин абсолютно любого возраста. Скачать приложение может каждая современная девушка для того, чтобы быть в курсе всего, что касается красоты, молодости и здоровья! Гид по красоте окажется полезным для тех, кто следит и ухаживает за собой. Приложение имеет 7 основных вкладок: уход за лицом, уход за телом, уход за кожей рук, фитнес, здоровый сон, правильное питание, советы для сохранения молодости. Здесь вы найдете много советов как держать себя в форме и прекрасно выглядеть. В приложении Вы найдете массу необходимой информации, которая поможет Вам ухаживать за своим лицом, телом, чтобы сохранить кожу молодой и красивой на долгое время. Выглядите каждый день изящно и неотразимо, следуя советам по уходу! Вся информация, которая когда-либо могла ускользнуть от вас, тщательно собрана в одной программе и готова к применению. 1.2 Формализация и обоснование алгоритма решения задачи Перед приложение стоит задача упростить и автоматизировать поиск информации в сфере красоты и здоровья. Данная задача будет решаться путем использования компонентов «TRadioGroup» и «TButton». При программировании компонентов был использован условный оператор «if then»: Procedure TFormMenu.btn2Click (Sender: TObject); Begin If rg1.ItemIndex = 0 then FormMonday.show; If rg1.ItemIndex = 1 then FormTuesday.show; If rg1.ItemIndex = 2 then FormWednesday.show; If rg1.ItemIndex = 3 then FormThursday.show; If rg1.ItemIndex = 4 then FormFriday.show; If rg1.ItemIndex = 5 then FormSaturday.show; If rg1.ItemIndex = 6 then FormSunday.show; end; Алгоритм решения задачи в виде блок-схемы представлен на рисунке1.  Рисунок 1. Блок-схема . 1.3 Выбор и описание функциональных модулей В приложении 11 форм. Ход работы в программе: Главная форма «FormGlavn» представляет собой начальную форму, на которой расположено: окно редактирования («TEdit»), панель управления («TPanel»). В окне редактирования пользователь должен указать свое имя и возраст. На панели есть кнопки («TButton»): «О нас», «Далее», «Выход». Воспользовавшись кнопкой «О нас», перед пользователем появляется информационное окно, с помощью которого пользователь сможет узнать о приложении. Кнопка «Далее» осуществляет переход на следующую форму. Кнопка «Выход» предназначена для завершения работы приложения. «FormMenu» - форма на которой расположен «TRadioGroup». При выборе одного из пункта меню и, нажав на кнопку «Далее», будет появляться соответствующая форма. Кнопка «Выход» для окончания работы программы. «FormMonday» и «FormMonday2». На данной форме пользователю предстоит пройти тест на тип кожи («TRadioGroup», «TButton», «TMemo») и, нажав на кнопку «Далее», перейти на следующую форму. После того как пользователь определился с типом кожи, на «FormMonday2» ему необходимо ознакомиться со статьей(«TRichEdit»). С помощью кнопки «Назад» пользователь возвращается в главное меню. «FormTuesday» - форма на которой пользователю предлагается прочесть статью («TRichEdit») и пройти мини-тест («TCombobox», «TButton»), посвященный биологическому возрасту. С помощью кнопки «Назад» пользователь возвращается в главное меню. «FormWednesday» - перед пользователем предстает окно редактирования («TEdit»), в котором он прописывает свой уход за кожей тела, а после должен прочесть предложенную статью («TRichEdit») и проанализировать свой уход, выявить ошибки. Далее предлагается мини-игра(«TGroupBox»). С помощью кнопки «Назад» пользователь возвращается в главное меню. «FormThursday» - перейдя на форму, перед пользователем появляется статья («TRichEdit»), которую необходимо прочесть, ответить на вопрос («TLabel») и записать ответ в окно редактирования («TEdit»). С помощью кнопки «Назад» пользователь возвращается в главное меню. «FormFriday» - на этой форме предлагается прочесть статью («TRichEdit»), пройти мини –игру («TGroupBox», «TImage», «TScrollBar») и ответить на вопрос, выбрав ответ, из уже ранее предложенных («TCombobox», «TLabel»). С помощью кнопки «Назад» пользователь возвращается в главное меню. «FormSaturday» - пользователю предстоит прочесть статью («TRichEdit») и пройти тест-игру («TPanel», «TRadioButton», «Button»), которая состоит из одного вопроса. С помощью кнопки «Назад» пользователь возвращается в главное меню. «FormSunday» - на данной форме пользователю предложена статья («TRichEdit») и после ее прочтения, необходимо оценить программу по десятибалльной шкале («TGroupbox», «TLabel», «TComboBox»). Воспользовавшись кнопкой «Выход», пользователь завершает программу. 1.4 Выбор и описание инструментальных средств Среди всего многообразия инструментальных средств была выбрана интегрированная среда разработки «Delphi7». Причиной тому служит простота и удобство. Наиболее существенный отрыв «Delphi» от ближайших аналогов состоит в действительно быстрой разработке приложений, обладающих сложным пользовательским интерфейсом, особенно имеющим сильные взаимосвязи между элементами управления, расположенными в окнах программы. «Delphi» предлагает довольно мощный набор компонентов для работы с базами данных. Существенным преимуществом в этой области является возможность управления базами данных на логическом уровне, соответствующем понятиям самих баз данных, без использования низкоуровневых запросов к драйверам. Такие возможности среды Delphi обусловили ее широкую применяемость при разработке автоматизированных систем управления предприятиями. Однако это не единственная область применения, так как возможности «Delphi» не ограничиваются вышеперечисленными. Так же в процессе создания приложения использовались: онлайн -редактор блок схем , в целях формализации и обосновании алгоритма решения задачи; браузер с основными поисковыми системами для поиска и обработки информации; электронные библиотеки : «ЭБС ZNANIUM.COM», «ЭБС Издательства "Лань"» для углубленного изучения поставленной темы; компьютерная справочная правовая система «КонсультантПлюс»; графический редактор для обработки и редактирования изображений , необходимых в рамках создания приложения ; ПК с оперативной памятью и жестким диском; операционная система «Windows 10» ; офисный пакет «Microsoft Office 2016». ПРАКТИЧЕСКАЯ ЧАСТЬ 2.1 Создание пользовательского интерфейса Приложение будет реализовано в форме окна, которое занимает 2/3 экрана, без возможности развернуть. Перемещение по формам будет - в форме кнопок, управление основными модулями будет осуществляться через форму меню. Будут так же использоваться тематические фоновые рисунки. Цвета, используемые в приложении, будут соответствовать цветовым схемам. Начальная форма - «FormGlavn», дает возможность перейти к меню (к форме «FormMenu») с помощью кнопки «Далее» и кнопки «Выход», чтобы завершить работу программы (Рисунок1). Кнопка «О нас» помогает пользователю изучить структуру приложения(Рисунок2).  Рисунок 1.Стартовая форма.  Рисунок 2.Информационное окно « О нас». «FormMenu» представляет собой меню с кнопкой «Далее», чтобы перейти к следующей форме (Рисунок 3.)  Рисунок 3. Форма «Меню». При нажатии на одну из кнопок в меню происходит переход на указанную форму, формы имеют разный функционал. На формах находятся 2 главных кнопки с возможностью перейти обратно к меню и закрыть программу. «Понедельник» содержит в себе тест и статью (Рисунок 4 и 5);  Рисунок 4.Форма «Понедельник».  Рисунок 5. Форма «Понедельник». «Вторник» - статья и мини-тест (Рисунок 6);  Рисунок 6. Форма «Вторник». «Среда» - статья, мини-игра и вопрос с окном редактированием, куда можно вносить ответ (Рисунок 7);  Рисунок 7.Форма «Среда». «Четверг» -статья, небольшой бонус к приложению и вопрос, на который необходимо ответить (Рисунок 8);  Рисунок 8.Форма «Четверг» «Пятница» -статья, мини-игра (Рисунок 9);  Рисунок9.Форма « Пятница». «Суббота» - статья, мини-тест (Рисунок 10);  Рисунок 10. Форма «Суббота». «Воскресенье» - статья, оценка приложения (Рисунок 11).  Рисунок 11.Форма «Воскресенье». 2.2 Реализация программного продукта на языке программирования На каждой из форм реализована возможность завершения работы программы, вернуться в главное меню и узнать возможности программы. Стартовая форма «FormGlavn»: Unit1; implementation uses Unit2, Unit5; {$R *.dfm} Код кнопки для перехода к форме «FormMenu»: procedure TFormGlavn.btn2Click(Sender: TObject); begin FormMenu.Show; end; Кнопка для завершения работы программы: procedure TFormGlavn.btn3Click(Sender: TObject); begin Application.Terminate; end; Кнопка для появления информационного окна : procedure TFormGlavn.btn1Click(Sender: TObject); begin AboutBox.show; end; Главная форма, меню «FormMenu»: unit Unit2; implementation uses Unit1, Unit5, Math, Unit3, Unit6, Unit7, Unit8, Unit9, Unit10, Unit11; {$R *.dfm} Для работы меню «TRadioGroup» использовался условный оператор if и кнопка «TButton»: procedure TFormMenu.btn2Click(Sender: TObject); begin if rg1.ItemIndex = 0 then FormMonday.show; if rg1.ItemIndex = 1 then FormTuesday.show; if rg1.ItemIndex = 2 then FormWednesday.show; if rg1.ItemIndex = 3 then FormThursday.show; if rg1.ItemIndex = 4 then FormFriday.show; if rg1.ItemIndex = 5 then FormSaturday.show; if rg1.ItemIndex = 6 then FormSunday.show; end; Второстепенные формы FormMonday; FormMonday2; FormTuesday; FormWednesday; FormThursday; FormFriday; FormSaturday; FormSunday; Переход к этим формам осуществляется с помощью меню ««TRadioGroup» и кнопки «TButton» - «Далее». На всех формах есть статьи, тесты, опросы, мини-игры. Статьи были реализованы с помощью «TRichEdit»; Тесты – «TRadioGroup», «TButton», «TGroupBox», «TComboBox»: procedure TFormMonday.btn4Click(Sender: TObject); var a, b, v, g, d: Integer; begin if ((rg1.ItemIndex = -1) and (rg2.ItemIndex = -1) and (rg3.ItemIndex = -1) and (rg4.ItemIndex = -1) and (rg5.ItemIndex = -1) and (rg6.ItemIndex = -1)) then begin ShowMessage('Ответьте на все вопросы!'); end else begin a := 0; b := 0; v := 0; g := 0; d := 0; with rg1 do begin if ItemIndex = 0 then inc(a); if ItemIndex = 1 then inc(b); if ItemIndex = 2 then inc(v); if ItemIndex = 3 then inc(g); if ItemIndex = 4 then inc(d); end; with rg2 do begin if ItemIndex = 0 then inc(a); if ItemIndex = 1 then inc(b); if ItemIndex = 2 then inc(v); if ItemIndex = 3 then inc(g); if ItemIndex = 4 then inc(d); end; with rg3 do begin if ItemIndex = 0 then inc(a); if ItemIndex = 1 then inc(b); if ItemIndex = 2 then inc(v); if ItemIndex = 3 then inc(g); if ItemIndex = 4 then inc(d); end; with rg4 do begin if ItemIndex = 0 then inc(a); if ItemIndex = 1 then inc(b); if ItemIndex = 2 then inc(v); if ItemIndex = 3 then inc(g); if ItemIndex = 4 then inc(d); end; with rg5 do begin if ItemIndex = 0 then inc(a); if ItemIndex = 1 then inc(b); if ItemIndex = 2 then inc(v); if ItemIndex = 3 then inc(g); if ItemIndex = 4 then inc(d); end; with rg6 do begin if ItemIndex = 0 then inc(a); if ItemIndex = 1 then inc(b); if ItemIndex = 2 then inc(v); if ItemIndex = 3 then inc(g); if ItemIndex = 4 then inc(d); end; procedure TFormWednesday.rb3Click(Sender: TObject); begin s:=s+1; end; procedure TFormWednesday.btn5Click(Sender: TObject); begin lbl4.Visible:=True; if s =1 then begin lbl5.Visible:=True; end; procedure TFormTuesday.btn5Click(Sender: TObject); begin if cbb1.Text='Менее 5 секунд' then lbl5.Visible:=True else if cbb1.Text='5 секунд ' then lbl6.Visible:=True else if cbb1.Text='8 секунд' then lbl7.Visible:=True else if cbb1.Text='10 секунд ' then lbl8.Visible:=True else if cbb1.Text='15 секунд' then lbl9.Visible:=True; end; Опросы были реализованы с помощью «TEdit» и «TLabel»; Мини-игра- с помощью «TImage», «TPanel», «TScrollBar». 2.3 Разработка руководства пользователя. Данное приложение простое в использовании, любой человек с базовыми знаниями и навыками управления компьютера может пользоваться данной программой. Кнопки на формах дают возможность перехода между собой. Приложение является: свободным, открытым, бесплатным, некоммерческим; распространяется на условиях свободной лицензии и даёт право использовать программу: |