Tweet

buy accutane online accutane without dermatologist blog.tutorem.com buy accutane 10mg uk How to Take Amoxicillin buy amoxicillin tfswhisperer.com how to take amoxicillin usa buy abortion pill abortion pill online buy naltrexone without prescription buy generic naltrexone online go buy naltrexone online 히포차트 4.3 의 새로운 기능은 날짜형 Y축 타입 라벨링을 적용하여 월별로 간트차트를 세팅할 수 있는 샘플입니다. 그 밖에 그룹 부모 설정, 화살표 설정 등의 내용이 적용되었습니다.

                

C#

 
Hippo.HippoEngine en = new HippoEngine();
en.DataType = DataSourceType.Excel;
en.ConnectionString = @" 연결문자열";
en.Query = "select * from [Sheet1$]";

SeriesList sList = en.GetSeriesListOfGantt(AxisDataType.DateTime, "항목", "시작일자", "종료일자");

sList.ChartType = ChartType.Gantt;

sList.AxisFactor.BackColor = Color.SkyBlue;

sList.AxisFactor.YAxis.Direction = AxisDirection.Top;

sList.AxisFactor.YAxis.DateTimeLabelType = DateTimeLabelType.Month;
sList.AxisFactor.YAxis.AxisUnitText = "월";
sList.AxisFactor.YAxis.DateTimeFormat = "MM";

sList.AxisFactor.XAxis.IsInverseAxis = true;
sList.AxisFactor.XAxis.LabelFormat.Alignment = StringAlignment.Near;


sList.SeriesCollection[0].items[0].IsMilestone = true;
sList.SeriesCollection[0].items[9].IsMilestone = true;

sList.SeriesCollection[0].items[0].ItemColor = Color.Red;
sList.SeriesCollection[0].items[9].ItemColor = Color.Red;

sList.SeriesCollection[0].items[2].ItemColor = Color.Violet;
sList.SeriesCollection[0].items[3].ItemColor = Color.Violet;
sList.SeriesCollection[0].items[4].ItemColor = Color.Violet;

sList.SeriesCollection[0].items[5].ItemColor = Color.YellowGreen;
sList.SeriesCollection[0].items[6].ItemColor = Color.YellowGreen;
sList.SeriesCollection[0].items[7].ItemColor = Color.YellowGreen;

sList.SeriesCollection[0].items[2].IsGroupBoss = true;
sList.SeriesCollection[0].items[5].IsGroupBoss = true;

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

sList.SeriesCollection[0].items[1].GanttName.Text = "[김철수, 박영희]";

sList.SeriesCollection[0].items[1].GanttProcess.Percent = 0.22;
sList.SeriesCollection[0].items[2].GanttProcess.Percent = 0.6;
sList.SeriesCollection[0].items[3].GanttProcess.Percent = 0.34;
sList.SeriesCollection[0].items[5].GanttProcess.Percent = 0.79;

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

VB

 

Dim en As Hippo.HippoEngine = New HippoEngine()
en.DataType = DataSourceType.Excel
en.ConnectionString = " 연결문자열"
en.Query = "select * from [Sheet1$]"

Dim sList As SeriesList = en.GetSeriesListOfGantt(AxisDataType.DateTime, "항목", "시작일자", "종료일자")

sList.ChartType = ChartType.Gantt

sList.AxisFactor.BackColor = Color.SkyBlue

sList.AxisFactor.YAxis.Direction = AxisDirection.Top

sList.AxisFactor.YAxis.DateTimeLabelType = DateTimeLabelType.Month
sList.AxisFactor.YAxis.AxisUnitText = "월"
sList.AxisFactor.YAxis.DateTimeFormat = "MM"

sList.AxisFactor.XAxis.IsInverseAxis = True
sList.AxisFactor.XAxis.LabelFormat.Alignment = StringAlignment.Near


sList.SeriesCollection(0).items(0).IsMilestone = True
sList.SeriesCollection(0).items(9).IsMilestone = True

sList.SeriesCollection(0).items(0).ItemColor = Color.Red
sList.SeriesCollection(0).items(9).ItemColor = Color.Red

sList.SeriesCollection(0).items(2).ItemColor = Color.Violet
sList.SeriesCollection(0).items(3).ItemColor = Color.Violet
sList.SeriesCollection(0).items(4).ItemColor = Color.Violet

sList.SeriesCollection(0).items(5).ItemColor = Color.YellowGreen
sList.SeriesCollection(0).items(6).ItemColor = Color.YellowGreen
sList.SeriesCollection(0).items(7).ItemColor = Color.YellowGreen

sList.SeriesCollection(0).items(2).IsGroupBoss = True
sList.SeriesCollection(0).items(5).IsGroupBoss = True

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

sList.SeriesCollection(0).items(1).GanttName.Text = "[김철수, 박영희]"

sList.SeriesCollection(0).items(1).GanttProcess.Percent = 0.22
sList.SeriesCollection(0).items(2).GanttProcess.Percent = 0.6
sList.SeriesCollection(0).items(3).GanttProcess.Percent = 0.34
sList.SeriesCollection(0).items(5).GanttProcess.Percent = 0.79

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