107
В третьей главе дано экономическое обоснование для внедрения
информационной системы автоматизации выбранного процесса.
Таким образом, основные задачи дипломного проекта — анализ
деятельности предприятия, выявление существующих недостатков в текущей
технологии управления, разработка автоматизированной системы электронного
документооборота, выполнены.
108
Список литературы
1. Авдошин А.А., Песоцкая Е.В.: Информатизация бизнеса.
Управление рисками, - М., ДМК-Пресс, 2013 г., 176 с.
2. Алекс Эллайн: C++. От ламера до программера (включая C++11), -
М., Издательство: Питер, 2017 г., 480 стр.
3. Аникеев С. П., Маркин Н.В.: Разработка приложений баз данных в
Delphi. Самоучитель, - М.,Диалог-МИФИ, 2015 г., 160 с.
4. Арнольд Виллемер: Программирование на С++, - М., Эксмо, 2015 г.,
528 с.
5. Брюс Тейт: Семь языков за семь недель. Практическое руководство
по изучению языков программирования, - М., Издательство: ДМК-Пресс, 2016
г., 384 стр.
6. Васвани В.А.: MySQL: использование и администрирование, СПб,
Питер, 2013 г., 368 с.
7. Васильев А.В: Самоучитель C++ с примерами и задачами, - М.,
Наука и Техника, 2017 г., 480 с.
8. Вигерс, Битти: Разработка требований к программному
обеспечению, - М., Издательство: BHV, 2016 г., 736 стр.
9. Герберт Шилдт: С++ для начинающих, - М., Эком, 2013 г., 640 с.
10. ГолощаповА. Р.: MicrosoftVisualStudio 2013, - М., BHV, 2013 г., 544
с.
11. ГурвицГ.Е.: Microsoft Access 2013. Разработка приложений на
реальном примере, - М., BHV, 2013 г., 424 с.
12. Дейтел, Дейтел: Как программировать на Visual C# 2014. Включая
работу на Windows 7 и Windows 8, - М., Питер, 2016 г., 864 с.
13. Джо Майо: Самоучитель MicrosoftVisualStudio 2013, - М., BHV,
2013 г., 464 с.
14. Исаев Г.А.: Информационные системы в экономике. Учебник, - М.,
Омега-Л, 2015 г., 462 с.
15. Исаев Г.А.: Проектирование информационных систем. Учебное
пособие, - М., Омега-Л, 2017 г., 424 с.
109
16. ИэнГриффитс: Программирование на C# 5.0, - М., Эксмо, 2016 г.,
1135 с.
17. Курлов А.А, Петров Е.А.: Методология информационной
аналитики, - М.,Проспект, 2016 г., 384 с.
18. Мартынов Н.А: Программирование для Windows на С\С++. В 2-х
томах, - М., Бином, 2015 г., 480 с.
19. Ошероув Р.О: Искусство автономного тестирования с примерами на
С#, - М., ДМК-Пресс, 2016 г., 360 с.
20. Паттерсон, Хеннесси: Архитектура компьютера и проектирование
компьютерных систе- М. Классика ComputersScience, Спб Питер, , 2014 г., 784 с.
21. Пирогов В.А.: Информационные системы и базы данных:
организация и проектирование, - М., BHV, 2009 г., 528 с.
22. Полубенцева - М. П.: С/С++ Процедурное программирование, - М.,
BHV, 2016 г., 432 с.
23. Потопахин В.С.: Искусство алгоритмизации, - М., Издательство:
ДМК-Пресс, 2016 г., 320 стр.
24. Пугачев Е.К., Шериев Ш.К., Кичинский Е.А.: Разработка
приложений для Windows 8 на языке C#, - М., BHV, 2015 г., 416 с.
25. Роберт Дж. Мюллер, Проектирование баз данных и UML, - М.,
Лори, 2015 год, 432 с.
26. Роберт Лафоре: Объектно-ориентированное программирование в
С++, - М., Питер, 2015 г., 928 с.
27. СурядныйА.Е.: Microsoft Access 2013. Лучший самоучитель, - М.,
Астрель, 2014 г., 448 с.
28. Таненбаум А.А, Бос Е.В.: Современные операционные системы,
Спб, Питер, 2017 г., 1120 стр
29. Тахагхогхи, Вильямс: Руководство по MySQL, - М., BHV, 2013 г.,
544 с.
30. Тимофеев В. А: Самоучитель С++ как он есть, - М., Бином, 2009 г.,
336 с.
31. Тюгашев А. Е.: Языки программирования. Учебное пособие.
Стандарт третьего поколения, - М., Издательство: Питер, 2016 г. 336 стр.
110
32. Ховард, Лебланк, Виега: Как написать безопасный код на С++, Java,
Perl, PHP, ASP.NET, - М., ДМК-Пресс, 2016 г., 288 с.
33. Чистов Д.А: Экономическая информатика (для бакалавров).
Учебное пособие, - М., Кнорус, 2016 г., 512 с.
34. Эндрю Стиллмен: Изучаем C#, - М., Питер, 2016 г., 816 с.
35. Энтони Молинаро, SQL. Сборник рецептов, - М., Символ-
Плюс,2013 г., 672 с.
36. Энтони Уильямс: Параллельное программирование на С++ в
действии. Практика разработки многопоточных программ, - М., ДМК-Пресс,
2016 г., 672 с.
111
Приложение. Листинг основных программных модулей
unit Categories;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, dxSkinsCore, dxSkinsDefaultPainters, cxStyles, cxGraphics,
cxEdit, cxDBLookupComboBox, cxCheckBox, Menus,
cxLookAndFeelPainters,
StdCtrls, cxButtons, cxVGrid, cxDBVGrid, cxControls, cxInplaceContainer,
cxLookAndFeels, cxDropDownEdit, cxSpinEdit;
type
TfrmCategory = class(TForm)
vgCategory: TcxDBVerticalGrid;
btnYes: TcxButton;
btnNo: TcxButton;
vgCategoryCategoryName: TcxDBEditorRow;
procedure FormShow(Sender: TObject);
procedure btnNoClick(Sender: TObject);
procedure btnYesClick(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
frmCategory: TfrmCategory;
112
implementation
uses DataBase;
{$R *.dfm}
procedure TfrmCategory.FormShow(Sender: TObject);
begin
if frmCategory.Tag=1 then
begin
DataInfo.qCategories.Insert;
end
else
begin
DataInfo.qCategories.Edit;
end;
end;
procedure TfrmCategory.btnNoClick(Sender: TObject);
begin
DataInfo.qCategories.Cancel;
frmCategory.Close;
end;
procedure TfrmCategory.btnYesClick(Sender: TObject);
begin
if DataInfo.qCategories.FieldByName('CategoryName').isNull then
begin
MessageDlg('Укажите категорию!',mtError,[mbOk],0);
Exit
end;
DataInfo.qCategories.Post;
113
frmCategory.Close;
end;
end.
unit TypeDoc;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, dxSkinsCore, dxSkinsDefaultPainters, cxStyles, cxGraphics,
cxEdit, cxDBLookupComboBox, cxCheckBox, Menus,
cxLookAndFeelPainters,
StdCtrls, cxButtons, cxVGrid, cxDBVGrid, cxControls, cxInplaceContainer,
cxLookAndFeels, cxDropDownEdit, cxSpinEdit;
type
TfrmTypeDoc = class(TForm)
vgTypeDoc: TcxDBVerticalGrid;
btnYes: TcxButton;
btnNo: TcxButton;
vgTypeDocTypeName: TcxDBEditorRow;
procedure FormShow(Sender: TObject);
procedure btnNoClick(Sender: TObject);
procedure btnYesClick(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
114
frmTypeDoc: TfrmTypeDoc;
implementation
uses DataBase;
{$R *.dfm}
procedure TfrmTypeDoc.FormShow(Sender: TObject);
begin
if frmTypeDoc.Tag=1 then
begin
DataInfo.qTypeDoc.Insert;
end
else
begin
DataInfo.qTypeDoc.Edit;
end;
end;
procedure TfrmTypeDoc.btnNoClick(Sender: TObject);
begin
DataInfo.qTypeDoc.Cancel;
frmTypeDoc.Close;
end;
procedure TfrmTypeDoc.btnYesClick(Sender: TObject);
begin
if DataInfo.qTypeDoc.FieldByName('TypeName').isNull then
begin
MessageDlg('Укажите тип документа!',mtError,[mbOk],0);
Exit
115
end;
DataInfo.qTypeDoc.Post;
frmTypeDoc.Close;
end;
end.