96
Заключение
Управление проектом – это процесс планирования, организации и управления
работами и ресурсами, направленный на достижение поставленной цели, как правило,
в условиях ограничений на время, имеющиеся ресурсы или стоимость работ.
Фактически каждую цель, которую ставит перед собой организация, можно
определить в качестве некоторого проекта, поскольку для ее достижения выполняется
ряд работ, задействуются ресурсы, персонал и выделяется время. Отсюда следует, что
процесс управления проектами имеет высокую значимость в процессе деятельности
организации, поскольку именно от того, насколько он грамотно организован, зависит
эффективность работы компании. По этой причине данный процесс целесообразно
автоматизировать с использованием специализированного ПО.
В рамках выполнения данной дипломной работы рассматривается процесс
автоматизации деятельности по управлению проектами в ОАО «ИнфоТеКС». В
работе детально рассмотрен процесс внедрения системы автоматизации управления
проектами, а также рассмотрен процесс расширения ее функционала, путем
разработки дополнительного модуля к данной системе.
Подводя итоги проделанной работы можно говорить о том, что ее конечная –
разработать проекта автоматизации процесса управления проектами в ОАО
«ИнфоТеКС» была достигнута в полной мере.
Для достижения поставленной цели в дипломном проекте решены следующие
задачи:
проанализированы теоретические материалы по теме работы;
изучены и выделены основные особенности структуры и организации
деятельности ОАО «ИнфоТеКС», необходимые для целей проведения последующей
автоматизации выбранного направления;
выявлены недостатки в существующей системе управления проектами;
дано обоснование выбора основных проектных решений;
разработана методика внедрения системы автоматизации управления
проектами в ОАО «ИнфоТеКС»;
дано обоснование экономической эффективности реализуемого проекта.
97
Проделанная работа имеет высокую практическую значимость, поскольку в ней
рассматриваются аспекты деятельности реальной организации ОАО «ИнфоТеКС», с
целью проведения ее автоматизации. Разработанный проект внедрения
автоматизированной информационной системы управления проектами может быть
расширен с целью интеграции в него дополнительных автоматизируемых функций,
связанных с проектным управлением.
98
Список использованной литературы
1. Александров Д.В. Методы и модели информационного менеджмента:
Учебное пособие. – М.: Финансы и статистика, 2017. – 336 с.
2. Баранова Е.Н. Информационная безопасность и защита информации. –
М.: РИОР, 2017. – 256 с.
3. Беннинга Ш. Финансовое моделирование с использованием MS Excel. –
М.: Вильямс, 2017. – 592 с.
4. Бланк И.А. Управление финансовыми ресурсами. – М.: Омега-Л, 2017. –
768 с.
5. Богданов В.В. Управление проектами. Корпоративная система – шаг за
шагом. – М.: Манн, Иванов и Фербер, 2017. – 248 с.
6. Будко А.Т. Определение требований к программному обеспечению на
предпроектном этапе. – М.: Вильямс, 2016. – 412 с.
7. Вайсфельд М. Объектно-ориентированное мышление. – М.: Вильямс,
2014. – 304 с.
8. Вендров А.М. Проектирование программного обеспечения
экономических информационных систем: Учебник. – М.: Финансы и статистика,
2017. – 352 с.
9. Вигерс К. Разработка требований к программному обеспечению. – СпБ.:
BHV, 2018. – 736 с.
10. Вирт Н. Алгоритмы и структуры данных. – М.:ДМК-Пресс, 2014 г. – 272
с.
11. Грабауров В. А. Информационные технологии для менеджеров. – М.:
Финансы и статистика, 2016. – 365 с.
12. Даморан А. Инвестиционная оценка. Инструменты и методы оценки
любых активов. – М.: Альпина Паблишер, 2017. – 1316 с.
13. Зуева А.Г., Носков Б.В. Практика и проблематика моделирования бизнес-
процессов. – М.: ДМК-Пресс, 2017. – 412 с.
14. Исаев Г.Д. Проектирование информационных систем. Учебное пособие.
– М.: Омега-Л, 2015. – 424 с.
99
15. Кнапп Д. Спринт. Как разработать и протестировать новый продукт
всего за пять дней. – М.: Альпина Паблишер, 2017. – 368 с.
16. Комлев Н.С. Объектно-ориентированное программирование. – М.:
Солон-пресс, 2014. – 298 с.
17. Кузин А. В. Базы данных. – М.: Академия, 2016. – 320 с.
18. Кумскова И. А., Базы данных. – М.: КноРус, 2017. – 488 стр.
19. Куперштейн В.Л. Microsoft Project 2013 в управлении проектами. – СпБ.:
BHV, 2015. – 219 с.
20. Ларман К. Применение UML 2.0 и шаблонов проектирования. Введение
в объектно-ориентированный анализ, проектирование и итеративную разработку. –
М.: Вильямс, 201. – 736 с.
21. Листер Т. Человеческий фактор. Успешные проекты и команды. – М.:
Символ-Плюс, 2014. – 288 с.
22. Макдермотт И. Искусство системного мышления. Необходимые знания о
системах и творческом подходе к решению проблем. – М.: Альпина Паблишер, 2017.
– 254 с.
23. Маклаков С.В. Моделирование бизнес-процессов с AllFusion Process
Modeller (BPwin 4.1). – М.: ДИАЛОГ-МИФИ, 2015. – 240 с.
24. Молчанов А.Ю. Системное программное обеспечение. – СпБ.: Питер,
2017 г. – 400 с.
25. Незнанов А.А., Программирование и алгоритмизация. – М.: Академия,
2018. – 304 с.
26. Осетрова И.С. Управление проектами в Microsoft Project 2010. – Спб:
НИУ ИТМО, 2017. – 69 с.
27. Перерва А.Д., Иванова А.А. Путь аналитика. Практическое руководство
IT-специалиста. – СпБ.: Питер, 2015. – 282 с.
28. Потопахин В.П. Искусство алгоритмизации, - Москва, Издательство:
ДМК-Пресс, 2014 г., 320 с.
29. Прокопенко Д.Ю. Управление проектами с использованием Microsoft
Project Server 2013. – М.: Альпина Паблишер, 2015. – 566 с.
30. Робсон М., Уллах Ф. Реинжиниринг бизнес-процессов: Практическое
руководство. – М.: Феникс, 2017. – 326 с.
100
31. Сазерленд Д. Scrum. Революционный метод управления проектами. – М.:
Манн, Иванов и Фербер, 2017. – 272 с.
32. Скороходов C.B. Управление проектам с использованием MS Project. –
М.: Вильямс, 2018. – 216 с.
33. Сорос Д. Алхимия финансов. – М.: Вильямс, 2018. – 368 с.
34. Тейт Б. Семь языков за семь недель. Практическое руководство по
изучению языков программирования. – М.: ДМК-Пресс, 2014. – 384 с.
35. Тернер Д. Руководство по проектно-ориентированному управлению. –
М.: Вильямя, 2018. – 312 с.
36. Тюгашев А Языки программирования. Учебное пособие. Стандарт
третьего поколения. – СпБ.: Питер, 2014. – 336 с.
37. Ховард Л. Как написать безопасный код на С++, Java, Perl, PHP,
ASP.NET. – М.: ДМК-Пресс, 2014. – 288 с.
38. Хоп Г., Вульф Б. Шаблоны интеграции корпоративных приложений. –
М.: Вильямс, 2016. – 672 с.
39. Шеер А.В. Моделирование бизнес-процессов. – М.: Либроком, 2017. –
126 с.
40. Яковлев И.Б. Аналитика бизнес-процессов: основы, секреты, трюки. –
СпБ.: BHV, 2017. – 272 с.
101
Приложение. Листинг программного модуля
unit UPaint;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics,
Controls, Forms,
Dialogs, jpeg, ExtCtrls, StdCtrls, Buttons, ColorGrd;
type
TPaintForm = class(TForm)
Image1: TImage;
Color_Bt: TSpeedButton;
Circle_Bt: TSpeedButton;
Rectangle_Bt: TSpeedButton;
Line_Bt: TSpeedButton;
Pen_Bt: TSpeedButton;
SizePen_LB: TListBox;
Panel2: TPanel;
Panel3: TPanel;
Panel4: TPanel;
Panel5: TPanel;
Paint_CG: TColorGrid;
Save_Image_Bt: TBitBtn;
Procedure ActionOfPainting(x,y : integer);
Procedure DrawingAPixel(x,y : integer);
Procedure DrawingALine(x,y : integer);
Procedure DrawingARectangle(x,y : integer);
procedure DrawingACircle(x,y : integer);
Procedure ColorOfPixel(Xi,Yi : integer);
Procedure CreateACopy;
Procedure ViewACopy;
procedure Paint_CGClick(Sender: TObject);
procedure SizePen_LBClick(Sender: TObject);
procedure Color_BtClick(Sender: TObject);
procedure Circle_BtClick(Sender: TObject);
102
procedure Rectangle_BtClick(Sender: TObject);
procedure Line_BtClick(Sender: TObject);
procedure Pen_BtClick(Sender: TObject);
procedure Save_Image_BtClick(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
PaintForm: TPaintForm;
NumAction : integer;
Xi,Yi : integer;
CopyBmp: TBitMap;
Const
ASelectColor = 0;
ARectangle = 1;
ALine = 2;
ACircle = 3;
APainting = 4;
implementation
uses Principal;
{$R *.dfm}
{>>DEFINITION DES ACTIONS DE RETOUCHE D'IMAGE}
Procedure TPaintForm.ActionOfPainting(x,y : integer);
Begin
{Le fameux case of pour dйclencher l'action а rйaliser suivant
notre choix prйcйdent : un case of est plus rapide qu'un while do,
begin until, if then, for do}
Case NumAction Of
ASelectColor : ColorOfPixel(xi,yi);
ARectangle : DrawingARectangle(x,y);
ALine : DrawingALine(x,y);
ACircle : DrawingACircle(x,y);
APainting : DrawingAPixel(x,y);
103
End;
End;
{>>DESSINER UN PIXEL}
Procedure TPaintForm.DrawingAPixel(x,y : integer);
Begin
Main.VisualImage.Canvas.Rectangle(xi,yi,xi+2,yi+2);
xi:=x;
yi:=y;
End;
{>>DESSINER UN TRAIT}
Procedure TPaintForm.DrawingALine(x,y : integer);
Begin
Main.VisualImage.Canvas.MoveTo(Xi,Yi);
{Pour dessiner un trait}
Main.VisualImage.canvas.lineTo(x,y);
end;
{>>DESSINER UN RECTANGLE}
Procedure TPaintForm.DrawingARectangle(x,y : integer);
Begin
Main.VisualImage.Canvas.brush.Style:=bsclear;
{On dessine un rectangle}
Main.VisualImage.Canvas.Rectangle(xi,yi,x,y);
end;
{>>DESSINER UN CERCLE}
procedure TPaintForm.DrawingACircle(x,y : integer);
Begin
Main.VisualImage.Canvas.brush.Style:=bsclear;
{On dessine une ellipse/Cercle}
Main.VisualImage.canvas.ellipse(xi,yi,x,y);
end;
{>>SELECTIONNE LA COULEUR D'UN PIXEL}
Procedure TPaintForm.ColorOfPixel(Xi,Yi : integer);
Var
AColor : TColor;
Begin
104
If not assigned(Main.VisualImage) then exit;
AColor:=Main.VisualImage.Canvas.Pixels[Xi,Yi];
Panel2.Color:=AColor;
{On sйlectionne la couleur d'un pixel}
Main.VisualImage.Canvas.Pen.Color:=AColor;
End;
{>>COPIE D'UNE IMAGE}
Procedure TPaintForm.CreateACopy;
Begin
{Si CopyBmp existe deja, on le dйtruit}
IF CopyBmp<>nil then FreeAndNil(CopyBmp);
{On le crйe}
CopyBmp:=TBitMap.Create;
{Sa largeur est celle de l'image}
CopyBmp.Width:=Main.VisualImage.Width;
{Sa hauteur est celle de l'image}
CopyBmp.Height:=Main.VisualImage.Height;
{On copie l'image dans CopyBmp}
CopyBmp.Canvas.StretchDraw(CopyBmp.Canvas.ClipRect,
Main.VisualImage.Picture.Bitmap);
End;
{>>AFFICHAGE DE LA COPIE}
Procedure TPaintForm.ViewACopy;
Begin
{Si CopyBmp existe}
If CopyBmp<>nil then
{On l'affiche}
Main.VisualImage.Picture.Bitmap.Assign(CopyBmp);
End;
{>>SELECTION DES COULEURS}
procedure TPaintForm.Paint_CGClick(Sender: TObject);
begin
With Paint_CG do
Begin
{On dйfinit la couleur du stylo}
105
Main.VisualImage.Canvas.Pen.Color:=ForegroundColor;
{On dйfinit la couleur du pinceau}
Main.VisualImage.Canvas.brush.Color:=BackgroundColor;
{On affiche ses couleurs dans un panel : c'est plus joli}
Panel2.Color:=ForegroundColor;
Panel3.Color:=BackgroundColor;
End;
end;
{>>TAILLE DU STYLO}
procedure TPaintForm.SizePen_LBClick(Sender: TObject);
begin
{On dйfinit la taille du stylo}
Main.VisualImage.Canvas.Pen.width:=StrToInt(SizePen_LB.Items.Strin
gs[SizePen_LB.ItemIndex]);
end;
procedure TPaintForm.Color_BtClick(Sender: TObject);
begin
NumAction:=ASelectColor;
end;
procedure TPaintForm.Circle_BtClick(Sender: TObject);
begin
NumAction:=ACircle;
end;
procedure TPaintForm.Rectangle_BtClick(Sender: TObject);
begin
NumAction:= ARectangle;
end;
procedure TPaintForm.Line_BtClick(Sender: TObject);
begin
NumAction:= ALine;
end;
procedure TPaintForm.Pen_BtClick(Sender: TObject);
begin
NumAction:=APainting;
end;