WindowsForm如何实现类似微软project软件的甘特图？

时间：2015-09-25 11:18:33 阅读：488 评论：0 收藏：0 [点我收藏+]

标签：

　　在管理软件研发过程中，特别是涉及项目管理或者生产计划方面，都需要一款类似微软project的控件对项目下的分解任务进行图形展示（甘特图）。下面介绍一下在WindowsForm下如何实现类似微软project软件的甘特图？最终的效果如下所示：

技术分享

1、VS2012创建一个Windows应用程序GanttChartControl，并添加甘特图控件库，结构如下：

技术分享

（注：此处甘特图控件是一款开源库，源码可从网上自行下载）

2、自定义任务类和资源类，代码如下：

 1  #region 自定义任务和资源类
 2     /// <summary>
 3     ///自定义资源
 4     /// </summary>
 5     [Serializable]
 6     public class MyResource
 7     {
 8         public string Name { get; set; }
 9     }
10     /// <summary>
11     /// 自定义任务类,继承 Task 接口 (可选)
12     /// </summary>
13     [Serializable]
14     public class MyTask : Task
15     {
16         public MyTask(ProjectManager manager) : base()
17         {
18             Manager = manager;
19         }
20 
21         private ProjectManager Manager { get; set; }
22 
23         public new int Start { get { return base.Start; } set { Manager.SetStart(this, value); } }
24         public new int End { get { return base.End; } set { Manager.SetEnd(this, value); } }
25         public new int Duration { get { return base.Duration; } set { Manager.SetDuration(this, value); } }
26         public new float Complete { get { return base.Complete; } set { Manager.SetComplete(this, value); } }
27     }
28     #endregion

为了能够保存甘特图信息，需要将任务类和资源类标志为[Serializable]。自定义任务类需要继承Task接口。
3、创建项目和任务，代码如下：

 1             // 创建项目和任务
 2             _mManager = new ProjectManager();
 3             var p项目= new MyTask(_mManager) { Name = "项目" };
 4             _mManager.Add(p项目);
 5             var t售前任务组 = new MyTask(_mManager) { Name = "售前阶段" };
 6             var t项目启动 = new MyTask(_mManager) { Name = "项目启动会" };
 7             var t需求调研 = new MyTask(_mManager) { Name = "需求调研" };
 8             var t方案撰写 = new MyTask(_mManager) { Name = "方案撰写" };
 9             var t方案确认 = new MyTask(_mManager) { Name = "方案确认" };
10             // 用ProjectManager类Add方法添加任务
11             _mManager.Add(t售前任务组);
12             _mManager.Add(t项目启动);
13             _mManager.Add(t需求调研);
14             _mManager.Add(t方案撰写);
15             _mManager.Add(t方案确认);

首先需要用 ProjectManager _mManager = new ProjectManager();创建一个ProjectManager，后续所有的任务都需要添加到此类Add方法添加任务进行管理。

任务的其他属性用下述代码进行设置：

 1          // 用ProjectManager类SetDuration方法设置任务工期
 2             _mManager.SetDuration(t项目启动, 3);
 3             _mManager.SetDuration(t需求调研, 5);
 4             _mManager.SetDuration(t方案撰写, 7);
 5             _mManager.SetDuration(t方案确认, 4);
 6             _mManager.SetDuration(tUI设计, 3);
 7             _mManager.SetDuration(t数据库设计, 5);
 8 
 9             //用ProjectManager类Split方法对任务进行分段
10             _mManager.Split(t数据库设计, new MyTask(_mManager), new MyTask(_mManager), 2);
11 
12             // 设置任务的完成率
13             t项目启动.Complete = 0.9f;
14             t需求调研.Complete = 0.5f;
15             t方案撰写.Complete = 0.4f;

4、任务分组和任务衔接关系定义

有了任务后，可以对任务的上下关系（分组）和接替关系进行定义，代码如下：

 1 // 给任务分组
 2             _mManager.Group(p项目, t售前任务组);
 3             _mManager.Group(p项目, t开发阶段);
 4             _mManager.Group(p项目, t实施阶段);
 5         
 6 
 7             _mManager.Group(t售前任务组, t项目启动);
 8             _mManager.Group(t售前任务组, t需求调研);
 9             _mManager.Group(t售前任务组, t方案撰写);
10             _mManager.Group(t售前任务组, t方案确认);
11             //任务衔接关系设置，不支持类型
12             _mManager.Relate(t项目启动, t需求调研);
13             _mManager.Relate(t需求调研, t方案撰写);
14             _mManager.Relate(t方案撰写, t方案确认);
15 
16 
17             _mManager.Group(t开发阶段, tUI设计);
18             _mManager.Group(t开发阶段, t数据库设计);
19             _mManager.Group(t开发阶段, t编码);
20             _mManager.Group(t开发阶段, t测试);
21 
22             _mManager.Relate(t方案确认, tUI设计);
23 
24             _mManager.Relate(tUI设计, t数据库设计);
25             _mManager.Relate(t数据库设计, t编码);
26             _mManager.Relate(t编码, t测试);
27 
28             _mManager.Group(t实施阶段, t系统安装和初始化);
29             _mManager.Group(t实施阶段, t系统培训);
30             _mManager.Group(t实施阶段, t系统验收);
31             _mManager.Group(t实施阶段, t结项);
32 
33             _mManager.Relate(t测试, t系统安装和初始化);
34             _mManager.Relate(t系统安装和初始化, t系统培训);
35             _mManager.Relate(t系统培训, t系统验收);
36             _mManager.Relate(t系统验收, t结项);

5、资源分配

 1           // 创建并设置任务资源（人、材料、设备等），任务资源可自定义
 2             var jake = new MyResource() { Name = "Jake" };
 3             var peter = new MyResource() { Name = "Peter" };
 4             var john = new MyResource() { Name = "John" };
 5             var lucas = new MyResource() { Name = "Lucas" };
 6             var james = new MyResource() { Name = "James" };
 7             var mary = new MyResource() { Name = "Mary" };
 8             // 给任务分配资源
 9             _mManager.Assign(t项目启动, jake);
10             _mManager.Assign(t项目启动, peter);
11             _mManager.Assign(t项目启动, john);
12             _mManager.Assign(t需求调研, jake);
13             _mManager.Assign(t需求调研, james);
14             _mManager.Assign(t数据库设计, james);
15             _mManager.Assign(t数据库设计, lucas);
16             _mManager.Assign(t方案撰写, mary);
17             _mManager.Assign(t方案撰写, lucas);
18             _mManager.Assign(t方案撰写, john);

6、甘特图初始化

 1             //甘特图初始化并创建任务代理
 2             _mChart.Init(_mManager);
 3             _mChart.CreateTaskDelegate = delegate() { return new MyTask(_mManager); };
 4 
 5             // 任务事件监听
 6             _mChart.TaskMouseOver += new EventHandler<TaskMouseEventArgs>(_mChart_TaskMouseOver);
 7             _mChart.TaskMouseOut += new EventHandler<TaskMouseEventArgs>(_mChart_TaskMouseOut);
 8             _mChart.TaskSelected += new EventHandler<TaskMouseEventArgs>(_mChart_TaskSelected);
 9             _mChart.PaintOverlay += _mOverlay.ChartOverlayPainter;
10             //允许任务拖拽
11             _mChart.AllowTaskDragDrop = true;
12 
13             // 设置任务提示内容，可自定义
14             _mChart.SetToolTip(t项目启动, string.Join(", ", _mManager.ResourcesOf(t项目启动).Select(x => (x as MyResource).Name)));
15             _mChart.SetToolTip(t需求调研, string.Join(", ", _mManager.ResourcesOf(t需求调研).Select(x => (x as MyResource).Name)));
16             _mChart.SetToolTip(t数据库设计, string.Join(", ", _mManager.ResourcesOf(t数据库设计).Select(x => (x as MyResource).Name)));
17             _mChart.SetToolTip(t方案撰写, string.Join(", ", _mManager.ResourcesOf(t方案撰写).Select(x => (x as MyResource).Name)));
18 
19             //设置图形日期信息
20             _mManager.TimeScale = TimeScale.Day;
21             var span = DateTime.Today - _mManager.Start;
22             _mManager.Now = (int)Math.Round(span.TotalDays);
23             // 设置图形标题显示日期格式
24             _mChart.TimeScaleDisplay = TimeScaleDisplay.DayOfWeek;