Разработка программного обеспечения для обработки данных о товарах зоомагазина

Тип:
Добавлен:

ДЕПАРТАМЕНТ ОБРАЗОВАНИЯ, НАУКИ И МОЛОДЕЖНОЙ ПОЛИТИКИ

ВОРОНЕЖСКОЙ ОБЛАСТИ

ГОСУДАРСТВЕННОЕ БЮДЖЕТНОЕ ПРОФЕССИОНАЛЬНОЕ ОБРАЗОВАТЕЛЬНОЕ УЧРЕЖДЕНИЕ

ВОРОНЕЖСКОЙ ОБЛАСТИ «СЕМИЛУКСКИЙ ПОЛИТЕХНИЧЕСКИЙ КОЛЛЕДЖ»

КУРСОВОЙ ПРОЕКТ

Разработка программного обеспечения для обработки данных о товарах зоомагазина

Специальность 09.02.03 Программирование в компьютерных системах

ПМ.01. Разработка программных модулей программного обеспечения для компьютерных систем

РЕФЕРАТ

Ключевые слова: ПРОГРАММНОЕ ОБЕСПЕЧЕНИЕ, СПЕЦИФИКАЦИЯ, ОТЛАДКА, ТЕСТИРОВАНИЕ, ДОКУМЕНТАЦИЯ, ИНТЕРФЕЙС, ЗООМАГАЗИН.

Объектом исследования является программное обеспечение для обработки данных о товарах зоомагазина.

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

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

В процессе работы исследованы теоретические сведения о товарах зоомагазина, изучены способы работы с динамическими массивами с использованием компонента StringGrid. На основе этого было создано приложение, которое позволяет обрабатывать и вносить данные в табличной форме и работать с ними.

Все неоговоренные в курсовом проекте рисунки и таблицы составлены автором по материалам практики и учебной литературы.

ВВЕДЕНИЕ

Цель курсового проекта: разработка программного обеспечения для обработки данных о товарах в зоомагазине.

Задачи:

-разработка программы на языке Delphi;

-создание удобного интерфейса;

-углубление знаний о языке программирования Delphi;

Данное программное обеспечение было решено разработать для быстрого и удобного нахождения информации о товарах зоомагазина. Программа предназначена для удобной работы продавцов. В случае, если нужно найти какой-либо товар, программа должна позволить быстро найти данные о нужном товаре в магазинах.

Для разработки программного обеспечения было решено указывать сведения о товарах:

1.Наименование.

2.Зоомагазин.

.Цена.

.Дата продажи.

.Дата поставки.

Предусматривается разработать данную программу на языке программирования Delphi. Для удобства просмотра данных, они должны выводиться в виде таблицы.

РАЗДЕЛ 1 ВОЗМОЖНОСТИ СРЕДЫ ПРОГРАММИРОВАНИЯ DELPHI ПРИ РАЗРАБОТКЕ ПРИЛОЖЕНИЯ С ВИЗУАЛЬНЫМ ИНТЕРФЕЙСОМ

представляет собой средство разработки приложений для Microsoft Windows. Delphi является мощным и простым в использовании инструментом для создания автономных программ, обладающих графическим интерфейсом (GUI), или 32-битных консольных приложений (программ, которые не имеют графического интерфейса).

В сочетании с Borland Kylix, программисты Delphi могут создавать из одного исходного текста приложения и для Windows и для Linux, и это открывает новые возможности и увеличивает потенциальную отдачу от усилий, вложенных в изучение Delphi. В Delphi используется кросс-платформенная библиотека компонентов CLX и визуальные дизайнеры для создания высокопроизводительных приложений для Windows, которые повторной компиляцией можно легко превратить в приложения для Linux.является первым языком программирования, обладающим простой в использовании средой для быстрой разработки приложений, разрушающей барьеры между языками высокого уровня, и языками, на низком уровне разговаривающими с системой на языке битов и байтов.

При создании графического интерфейса приложений Delphi, у вас все возможности языка программирования Object Pascal, "завернутого" в среду RAD. Такие компоненты окна графического пользовательского интерфейса, как формы, кнопки и списки объектов, включены в состав Delphi. Это означает, что вам не нужно писать никакого кода при добавлении их в ваше приложение. Вы просто "кладёте" их на вашу Форму, как в графическом редакторе. Вы можете также добавить на Форму элементы управления ActiveX, для создания в считанные минуты специализированных программ таких, например, как веб-браузеры. Delphi позволяет разработчикам дизайна внедрять в интерфейс новые элементы и кодировать их события одним щелчком мыши.поставляется в различных конфигурациях, настроенных на потребности различных предприятий. В Delphi вы можете писать программы для Windows быстрее и легче, чем это было возможно раньше.

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

За внешний вид компонента Delphi StringGrid отвечают такие основные свойства таблицы как наличие внешних границ таблицы, наличие и толщина линий, разделяющих ячейки, количество строк и столбцов "фиксированной" зоны и их цвет, размеры и цвет "обычных" ячеек, возможность пользователю менять размеры ячеек мышкой, наличие полос прокрутки.

Таблица Delphi StringGrid также обладает очень важным и полезным свойством, характерным для компонентов с графическими возможностями - Canvas(канва). Это свойство позволяет как произвольно рисовать в пределах таблицы, так и размещать в ячейках рисунки и другие графические данные. А также именно это свойство позволяет управлять расположением строк в ячейках. Дело в том, что сама таблица Delphi StringGrid размещает содержимое своих ячеек у их левого края. Программист, работая с канвой таблицы, может разместить данные как по центру, так и у правого края ячеек, в зависимости от потребностей.

Тем самым, таблица Delphi StringGrid обладает широким спектром свойств, помогающим программисту придать нужный стиль, соответствующий дизайн и информационную наполненность приложениям, использующим табличное представление и обработку рабочих данных.

delphi код модуль интерфейс

РАЗДЕЛ 2 РАЗРАБОТКА ПРОГРАММНОГО ОБЕСПЕЧЕНИЯ

2.1 Разработка спецификации программного обеспечения

Спецификация это законченное поведение программы и требования к ней, которую требуется разработать. Программное обеспечение должно иметь главную форму с находящейся на ней таблицей для вывода данных. В программе должны иметься кнопки управления самой программой, которые позволяют добавлять информацию в таблицу, удалять информацию из таблицы, сохранять содержимое таблицы. Программа должна иметь информацию о самой программе, открытие происходит с помощью специальной кнопки, и информацию об авторе программы, которая открывается после нажатия специальной кнопки. Кнопки должны быть продублированы в главном меню. Для безопасной и правильной работы программы рекомендуется иметь Источник бесперебойного питания. Температура компьютера не должна выходить за рамки значения температуры -20 + 35 градусов по цельсию. Для исключения возможности потери информации программа должна иметь возможность быстро сохранять эту информацию. Специальной защиты данных для пользователя не предусматривается в программе. Программа должна иметь удобный и понятный интерфейс для работы с информацией.

2.2 Разработка кода программного продукта на основе готовой спецификации

Было разработано главное окно программы, Данные представлены в виде таблицы, поэтому основная часть формы занимает таблица StrinGrid. На форме были расположены кнопки, они отображены на (Рисунок 1).

Рисунок 1 - Главная форма программы

Кнопка «Открыть» позволяет открыть диалоговое окно с информацией о товарах зоомагазина. Причем в заголовке отображено назначение диалогового окна. Оно отображено на рисунке 2. Для этого окна были установлены фильтры для открытия различных типов документов: текстовые файлы, все файлы (рисунок 3).

Рисунок 2 - Открытие файла

Рисунок 3 - Установленные фильтры

Для реализации этой кнопки используется код:

TForm2.Button1Click(Sender: TObject);OpenDialog1.Execute then:=OpenDialog1.FileNames:='primer.txt';(f,s);(f);:=0;not eof(f) do(f);(f);(f);(f);(f);(k);(f);;(f);(f,s);(f);.ColCount:=5;.rowCount:=k;.cells[0,0]:='Наименование';.cells[1,0]:='Зоомагазин';.cells[2,0]:='Цена';.cells[3,0]:='Дата продажи';.cells[4,0]:='Дата поставки';i:= 1 to SG1.RowCount-1 doj:= 0 to SG1.ColCount-1 do begin(f,x);.Cells[j,i]:=x;;(f,x);;(f);;

Кнопка «Добавить» позволяет добавить одну строку в таблицу StringGrid. Для реализации этой кнопки используется код:

TForm2.Button5Click(Sender: TObject); //добавитьSG1.RowCount>1 then.RowCount:=SG1.RowCount+1;;

Кнопка «Удалить» позволяет удалить строку из таблицы. Для реализации этой кнопки используется код:

TForm2.Button6Click(Sender: TObject);: string;: integer;,j:integer;:=inputbox('Ввод данных','Введите номер строки для удаления', '1');

b:=strtoint(a);(b<2) or (b> SG1.RowCount) then ShowMessage('Такого поля нет')SG1 do begini := b to RowCount - 1 doj := 0 to ColCount - 1 do[j,i]:=cells[j,i+1];:=RowCount-1;

;

;

end;

Кнопка «Сохранить» сохраняет данные в открытом ранее пользователем файле. Для этого была описана глобальная переменная s, в которой сохраняется путь к файлу при работе. Для реализации этой кнопки используется код:

TForm2.Button2Click(Sender: TObject);s <> '' then begin

(f,s);(f);i:=1 to SG1.RowCount-1 doj:=0 to SG1.ColCount-1 do(f,SG1.cells[j,i]);(f,'');;(f)

end

('Вы не выбрали файл.'+#10#13+'Нужно открыть файл или создать новый и нажать кнопку "Сохранить как"');

;

Кнопка «Сохранить как» сохраняет данные введенные в таблице как отдельный новый файл (Рисунок 5). Для реализации этой кнопки используется код:

TForm2.Button3Click(Sender: TObject);SaveDialog1.Execute then begin:=SaveDialog1.FileName+'.txt';

assignfile(f,s);

rewrite(f);i:=1 to SG1.RowCount-1 doj:=0 to SG1.ColCount-1 do(f,SG1.cells[j,i]);(f,'');;(f)

;

Рисунок 5 - сохранение файла

Кнопка «О программе» открывает информацию о самой созданной программе (Рисунок 6). Для реализации этой кнопки используется код:

TForm2.Button4Click(Sender: TObject);.show;;

Рисунок 6 - О программе

Кнопка «Об авторе» открывает информацию об авторе созданной программы (Рисунок 7). Для реализации этой кнопки используется код:

TForm2.Button7Click(Sender: TObject);

form4.show;

end;

Рисунок 7 - Об авторе программы

Кнопка «Выход» закрывает программу. Для реализации этой кнопки используется код:

TForm2.BitBtn1Click(Sender: TObject);

begin.close;;

2.3 Отладка программных модулей с использованием специализированных программных средств

Отладка ПС - это деятельность, направленная на обнаружение и исправление ошибок в ПС с использованием процессов выполнения его программ. В программе был использован способ «Трассировка». Это процесс выполнения программы по шагам (step-by-step), инструкция за инструкцией. Во время трассировки программист дает команду: выполнить очередную инструкцию программы.

Ниже приведены фрагменты из кода программы позволяющие избежать ошибок.

Для кнопки «Открыть» :

… //Условия для открытия файла('Вы не выбрали файл');

Для кнопки «Удалить»:

…///Удаление строки ('Такой строки нет');

Для кнопки «Сохранить как»:

…//Сохранение файла('Вы не выбрали файл');

2.4 Тестирование программного обеспечения

Тестирование - это любая деятельность, направленная на обнаружение ошибок в программном продукте. Тестирование проводится для того, чтобы найти ошибки в программе и тем самым повысить ее надежность.

Тестирование программы приведено ниже.

При запуске программы открывается главная форма программы (Рисунок 8).

Рисунок 8 - Главная форма

При нажатии на кнопку «Открыть» открывается окно (Рисунок 9) и заполняется таблица выбранными данными (Рисунок 10).

Рисунок 9 - Работа кнопки «Открыть»

Рисунок 10 - Заполнение таблицы

Если файл не был выбран, появляется окно (Рисунок 11).:

Рисунок 11 - Сообщение об ошибке

Кнопка «Сохранить» позволяет сохранить данные в документе. Кнопка «Сохранить как» сохраняет документ в выбранном пользователем документе (Рисунок 12).

Рисунок 12 - Сохранение документа

Кнопки «О программе» и «Об авторе» открывают информацию об программе и ее разработчике. (Рисунок 13-14).

Рисунок 13 - О программе

Рисунок 14 - Об авторе

На формах (Рисунок 13, 14) расположена кнопка «Вернуться», которая возвращает пользователя на главную форму. Расположенная на главной форме кнопка «Выход» закрывает программу.

2.5 Оптимизация программного кода

Оптимизация программы - улучшение программы, поиск лучших вариантов для более быстрой и стабильной работы программы. Для оптимизации программы следует убирать «мертвые коды», которые не используются при работе программы, устранять мелкие небрежности кода программы и т.п.

procedure TForm2.Button3Click(Sender: TObject);SaveDialog1.Execute then begin:=SaveDialog1.FileName+'.txt';(f,s);(f);i:=1 to SG1.RowCount-1 doj:=0 to SG1.ColCount-1 do(f,SG1.cells[j,i]);(f,'');;(f)('Вы не выбрали файл');

;

2.6 Разработка компонентов проектной и технической документации с использованием графических языков спецификаций

Блок-схема детализируемой программы (в соответствии с ГОСТ 19.701-90).

Рисунок 15 - Схема программы

В схеме отражены основные возможности работы приложения. На рисунке выше она представляет собой совокупность символов, соответствующих этапам работы алгоритма и соединяющих их линий.

ЗАКЛЮЧЕНИЕ

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

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

1.Наименование.

2.Зоомагазин.

.Цена.

.Дата продажи.

.Дата поставки.

Были углублены знания о возможностях Delphi, работы с таблицами StringGrid и другими возможностями данной программы.

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

СПИСОК ИСПОЛЬЗОВАННЫХ ИСТОЧНИКОВ

1. Культин Н.Б. Embarcadero Delphi.

2. Дмитрий Осипов Базы данных и Delphi. Теория и практика.

. Рубанцев Валерий. Описание книги Delphi в примерах, играх и программах.

. Михаил Голованов, Евгений Веселов. Создание компонентов в среде Delphi. Руководство разработчика.

. Иван Хладни. Внутренний мир Borland Delphi.

. А. Я. Архангельский. Программирование в Delphi для Windows.

. А. Чиртик, В. Борисок, Ю. Корвель. Трюки и эффекты.

9. М. Е. Фленов. Delphi глазами хакера <#"justify">ПРИЛОЖЕНИЕ А

Листинг программы

procedure TForm2.BitBtn1Click(Sender: TObject); //закрыть.close;;

TForm2.Button1Click(Sender: TObject); //открытьOpenDialog1.Execute then:=OpenDialog1.FileNames:='primer.txt';(f,s);(f);:=0;not eof(f) do(f);(f);(f);(f);(f);(k);(f);;(f);(f,s);(f);.ColCount:=5;.rowCount:=k;.cells[0,0]:='Наименование';.cells[1,0]:='Зоомагазин';.cells[2,0]:='Цена';.cells[3,0]:='Дата продажи';.cells[4,0]:='Дата поставки';i:= 1 to SG1.RowCount-1 doj:= 0 to SG1.ColCount-1 do begin(f,x);.Cells[j,i]:=x;;(f,x);;(f);;TForm2.Button2Click(Sender: TObject); //сохранитьs <> '' then begin

(f,s);(f);i:=1 to SG1.RowCount-1 doj:=0 to SG1.ColCount-1 do(f,SG1.cells[j,i]);(f,'');;(f)

else

showmessage ('Вы не выбрали файл.'+#10#13+'Нужно открыть файл или создать новый и нажать кнопку "Сохранить как"');

end;

TForm2.Button3Click(Sender: TObject); //сохранить какSaveDialog1.Execute then begin:=SaveDialog1.FileName+'.txt';(f,s);(f);i:=1 to SG1.RowCount-1 doj:=0 to SG1.ColCount-1 do(f,SG1.cells[j,i]);(f,'');;(f)('Вы не выбрали файл');

;

TForm2.Button4Click(Sender: TObject); //о программе.show;;

TForm2.Button5Click(Sender: TObject); //добавитьSG1.RowCount>1 then.RowCount:=SG1.RowCount+1;;

TForm2.Button6Click(Sender: TObject); //удалить: string;: integer;,j:integer;:=-1;SG1 do begini := 1 to RowCount - 1 docells[1,i]=a then b:=i;

b<> -1 then beginRowCount>=2 theni := b to RowCount - 1 doj := 0 to ColCount - 1 do[j,i]:=cells[j,i+1];:=RowCount-1;ShowMessage('Такого поля нет');;

;TForm2.Button7Click(Sender: TObject); //об авторе.show;;

TForm2.FormCreate(Sender: TObject); //цвет формы.color:=rgb(98,99,155);;

TForm2.FormShow(Sender: TObject);.ColWidths[0]:=250;;

TForm2.N2Click(Sender: TObject);OpenDialog1.Execute then:=OpenDialog1.FileNames:='primer.txt';(f,s);(f);:=0;not eof(f) do(f);(f);(f);(f);(f);(k);(f);;(f);(f,s);(f);.ColCount:=5;.rowCount:=k;.cells[0,0]:='Наименование';.cells[1,0]:='Зоомагазин';.cells[2,0]:='Цена';.cells[3,0]:='Дата продажи';.cells[4,0]:='Дата поставки';i:= 1 to SG1.RowCount-1 doj:= 0 to SG1.ColCount-1 do begin(f,x);.Cells[j,i]:=x;;(f,x);;(f);;

TForm2.N3Click(Sender: TObject);s <> '' then begin

(f,s);(f);i:=1 to SG1.RowCount-1 doj:=0 to SG1.ColCount-1 do(f,SG1.cells[j,i]);(f,'');;(f)

else

showmessage ('Вы не выбрали файл.'+#10#13+'Нужно открыть файл или создать новый и нажать кнопку "Сохранить как"');

end;

TForm2.N4Click(Sender: TObject);SaveDialog1.Execute then begin:=SaveDialog1.FileName+'.txt';(f,s);(f);i:=1 to SG1.RowCount-1 doj:=0 to SG1.ColCount-1 do(f,SG1.cells[j,i]);(f,'');;(f)('Вы не выбрали файл');

;

TForm2.N5Click(Sender: TObject);.close;;

TForm2.N7Click(Sender: TObject);.show;;

TForm2.N8Click(Sender: TObject);.show;;

TForm2.SG1DrawCell(Sender: TObject; ACol, ARow: Integer; Rect: TRect;: TGridDrawState);:string;: integer;Sender as TStringGrid do.FillRect(Rect);(Canvas.Handle,(Cells[ACol, ARow]),(Cells[ACol, ARow]),, DT_WORDBREAK or_EXPANDTABS);;;

.

Copyright © 2018 WorldReferat.ru All rights reserved.