Home 소개       다운로드       온라인 설명서      주식/코인 차트    Q & A     Blog    

Gantt chart - arrow, process, peoples







일정 변경 및 이전, 진행율 표시, 프로젝트 인력 표시를 반영한 간트차트




Gantt chart  Gantt chart - multi series  Gantt chart - arrow, process, peoples  간트차트 - 시간/분 스케일  히포차트 4.1 - 간트차트 (마일스톤, 그룹화)  간트차트 좀 더 자세한 설정  히포차트 4.3 - 날짜형 축을 이용한 간트차트 (월별)  히포차트 4.3 - 간트차트(Gantt chart) 마우스 이동하여 날짜 변경하기  


C#
 
SeriesList sList = new SeriesList();
sList.SeriesCollection.Add(new Series());
sList.ChartType = ChartType.Gantt;
sList.AxisFactor.YAxis.DataType = AxisDataType.DateTime;
sList.AxisFactor.YAxis.Interval = 7;
sList.AxisFactor.YAxis.DateTimeFormat = "yy-MM-dd";

sList.AxisFactor.XAxis.LabelFormat = new StringFormat();
sList.AxisFactor.XAxis.LabelFormat.LineAlignment = StringAlignment.Center;
sList.AxisFactor.XAxis.LabelFormat.Alignment = StringAlignment.Far;


for(int i = 0; i < 5; i++)
{
sList.SeriesCollection[0].items.Add(new SeriesItem());
}

sList.SeriesCollection[0].items[0].YStartDateTimeValue = new DateTime(2009, 1, 10);
sList.SeriesCollection[0].items[0].YDateTimeValue = new DateTime(2009, 1, 17);
sList.SeriesCollection[0].items[1].YStartDateTimeValue = new DateTime(2009, 1, 18);
sList.SeriesCollection[0].items[1].YDateTimeValue = new DateTime(2009, 1, 25);
sList.SeriesCollection[0].items[2].YStartDateTimeValue = new DateTime(2009, 1, 31);
sList.SeriesCollection[0].items[2].YDateTimeValue = new DateTime(2009, 2, 10);
sList.SeriesCollection[0].items[3].YStartDateTimeValue = new DateTime(2009, 2, 10);
sList.SeriesCollection[0].items[3].YDateTimeValue = new DateTime(2009, 2, 18);
sList.SeriesCollection[0].items[4].YStartDateTimeValue = new DateTime(2009, 2, 19);
sList.SeriesCollection[0].items[4].YDateTimeValue = new DateTime(2009, 2, 27);

sList.SeriesCollection[0].items[0].Name = "프로젝트 제안";
sList.SeriesCollection[0].items[1].Name = "DB 및 Framework 설계";
sList.SeriesCollection[0].items[2].Name = "개발 기간";
sList.SeriesCollection[0].items[3].Name = "1차 검수기간";
sList.SeriesCollection[0].items[4].Name = "유지 보수";

sList.SeriesCollection[0].items[0].ArrowLabel.Text = " 김철수, 박과장";
sList.SeriesCollection[0].items[1].ArrowLabel.Text = " 윤정남, 김팀장\r\n 김태우, 이우석, 이철민";
sList.SeriesCollection[0].items[3].ArrowLabel.Text = " 이동건";

sList.SeriesCollection[0].items[0].ArrowLabel.ForeColor = Color.Gray;
sList.SeriesCollection[0].items[1].ArrowLabel.ForeColor = Color.Gray;
sList.SeriesCollection[0].items[3].ArrowLabel.ForeColor = Color.Gray;

sList.SeriesCollection[0].items[0].ParentIndex = 1;
sList.SeriesCollection[0].items[1].ParentIndex = 2;
sList.SeriesCollection[0].items[3].ParentIndex = 4;

sList.SeriesCollection[0].items[0].GanttProcess.Percent = 0.3;
sList.SeriesCollection[0].items[1].GanttProcess.Percent = 0.5;
sList.SeriesCollection[0].items[3].GanttProcess.Percent = 0.7;

sList.SeriesCollection[0].items[0].GanttProcess.ProcessColor = Color.FromArgb(140, 202, 249);
sList.SeriesCollection[0].items[1].GanttProcess.ProcessColor = Color.FromArgb(107, 202, 102);
sList.SeriesCollection[0].items[3].GanttProcess.ProcessColor = Color.Red;

sList.SeriesCollection[0].ArrowLine.LineWidth = 3;
sList.AxisFactor.Orientation = AxisOrientation.TopLeft;

sList.SeriesCollection[0].items[0].ItemColor = Color.FromArgb(140, 202, 249);
sList.SeriesCollection[0].items[1].ItemColor = Color.FromArgb(107, 202, 102);
sList.SeriesCollection[0].items[2].ItemColor = Color.FromArgb(74, 126, 225);
sList.SeriesCollection[0].items[3].ItemColor = Color.Red;
sList.SeriesCollection[0].items[4].ItemColor = Color.LightBlue;

this.hHippoChart1.SeriesListDictionary.Add(sList);
this.hHippoChart1.LegendBox.Visible = false;
this.hHippoChart1.DrawChart();


VB
 
Dim sList As New. SeriesList()
sList.SeriesCollection.Add(New Series())
sList.ChartType = ChartType.Gantt
sList.AxisFactor.YAxis.DataType = AxisDataType.DateTime
sList.AxisFactor.YAxis.Interval = 7
sList.AxisFactor.YAxis.DateTimeFormat = "yy-MM-dd"

sList.AxisFactor.XAxis.LabelFormat = New StringFormat()
sList.AxisFactor.XAxis.LabelFormat.LineAlignment = StringAlignment.Center
sList.AxisFactor.XAxis.LabelFormat.Alignment = StringAlignment.Far


For i As Integer = 0 To 4
sList.SeriesCollection(0).items.Add(New SeriesItem())
Next

sList.SeriesCollection(0).items(0).YStartDateTimeValue = New DateTime(2009, 1, 10)
sList.SeriesCollection(0).items(0).YDateTimeValue = New DateTime(2009, 1, 17)
sList.SeriesCollection(0).items(1).YStartDateTimeValue = New DateTime(2009, 1, 18)
sList.SeriesCollection(0).items(1).YDateTimeValue = New DateTime(2009, 1, 25)
sList.SeriesCollection(0).items(2).YStartDateTimeValue = New DateTime(2009, 1, 31)
sList.SeriesCollection(0).items(2).YDateTimeValue = New DateTime(2009, 2, 10)
sList.SeriesCollection(0).items(3).YStartDateTimeValue = New DateTime(2009, 2, 10)
sList.SeriesCollection(0).items(3).YDateTimeValue = New DateTime(2009, 2, 18)
sList.SeriesCollection(0).items(4).YStartDateTimeValue = New DateTime(2009, 2, 19)
sList.SeriesCollection(0).items(4).YDateTimeValue = New DateTime(2009, 2, 27)

sList.SeriesCollection(0).items(0).Name = "프로젝트 제안"
sList.SeriesCollection(0).items(1).Name = "DB 및 Framework 설계"
sList.SeriesCollection(0).items(2).Name = "개발 기간"
sList.SeriesCollection(0).items(3).Name = "1차 검수기간"
sList.SeriesCollection(0).items(4).Name = "유지 보수"

sList.SeriesCollection(0).items(0).ArrowLabel.Text = " 김철수, 박과장"
sList.SeriesCollection(0).items(1).ArrowLabel.Text = " 윤정남, 김팀장" & vbCr & vbLf & " 김태우, 이우석, 이철민"
sList.SeriesCollection(0).items(3).ArrowLabel.Text = " 이동건"

sList.SeriesCollection(0).items(0).ArrowLabel.ForeColor = Color.Gray
sList.SeriesCollection(0).items(1).ArrowLabel.ForeColor = Color.Gray
sList.SeriesCollection(0).items(3).ArrowLabel.ForeColor = Color.Gray

sList.SeriesCollection(0).items(0).ParentIndex = 1
sList.SeriesCollection(0).items(1).ParentIndex = 2
sList.SeriesCollection(0).items(3).ParentIndex = 4

sList.SeriesCollection(0).items(0).GanttProcess.Percent = 0.3
sList.SeriesCollection(0).items(1).GanttProcess.Percent = 0.5
sList.SeriesCollection(0).items(3).GanttProcess.Percent = 0.7

sList.SeriesCollection(0).items(0).GanttProcess.ProcessColor = Color.FromArgb(140, 202, 249)
sList.SeriesCollection(0).items(1).GanttProcess.ProcessColor = Color.FromArgb(107, 202, 102)
sList.SeriesCollection(0).items(3).GanttProcess.ProcessColor = Color.Red

sList.SeriesCollection(0).ArrowLine.LineWidth = 3
sList.AxisFactor.Orientation = AxisOrientation.TopLeft

sList.SeriesCollection(0).items(0).ItemColor = Color.FromArgb(140, 202, 249)
sList.SeriesCollection(0).items(1).ItemColor = Color.FromArgb(107, 202, 102)
sList.SeriesCollection(0).items(2).ItemColor = Color.FromArgb(74, 126, 225)
sList.SeriesCollection(0).items(3).ItemColor = Color.Red
sList.SeriesCollection(0).items(4).ItemColor = Color.LightBlue

Me.hHippoChart1.SeriesListDictionary.Add(sList)
Me.hHippoChart1.LegendBox.Visible = False
Me.hHippoChart1.DrawChart()



※ 히포차트 샘플 코드는 버전별로 상이한 결과를 나타낼 수 있습니다.

이 코드 관련 문의 사항은 페이스북 리플을 달아주시거나 아래 이메일로 이 페이지 주소와 함께 문의주세요.

helpdesk@hippochart.com





Copyright © 2009-2016, HippoChart. Inc.  All Rights Reserved.