AxisTick : 눈금에 이미지를 넣어보자.

 

C#

SeriesList sList = new SeriesList();             sList.ChartType = ChartType.Bar;             sList.IsShow3D = true;             AxisTick tk = new AxisTick("item1");             tk.IconPath = @"F:\My Pictures\아이콘\korean.png";             sList.AxisFactor.XAxis.Ticks.Add(tk);             AxisTick tk2 = new AxisTick("item3");             tk2.IconPath = @"F:\My Pictures\아이콘\japan.png";             sList.AxisFactor.XAxis.Ticks.Add(tk2);             AxisTick tk3 = new AxisTick("item5");             tk3.IconPath = @"F:\My Pictures\아이콘\british.png";             sList.AxisFactor.XAxis.Ticks.Add(tk3);             Random r = new Random();             for (int i = 0; i < 4; i++)             {                 Series sr = new Series();                 sr.Points.Width = 6;                 sr.Points.PointType = PointType.FillRectangle;                 for (int x = 0; x < 6; x++)                 {                     SeriesItem item = new SeriesItem();                     item.Name = "item" + x.ToString();                     item.XValue = x;                     item.YValue = r.Next(900);                     sr.items.Add(item);                 }                 sList.SeriesCollection.Add(sr);             }               this.hHippoChart1.Direction = GraphAreaLocation.Vertical;             this.hHippoChart1.DesignType = ChartDesignType.Simple;             this.hHippoChart1.Titles.Label.ForeColor = Color.SteelBlue;              this.hHippoChart1.SeriesListDictionary.Add(sList);               this.hHippoChart1.DrawChart();

VB

Dim sList As New SeriesList() sList.ChartType = ChartType.Bar sList.IsShow3D = True Dim tk As New AxisTick("item1") tk.IconPath = "F:\My Pictures\아이콘\korean.png" sList.AxisFactor.XAxis.Ticks.Add(tk) Dim tk2 As New AxisTick("item3") tk2.IconPath = "F:\My Pictures\아이콘\japan.png" sList.AxisFactor.XAxis.Ticks.Add(tk2) Dim tk3 As New AxisTick("item5") tk3.IconPath = "F:\My Pictures\아이콘\british.png" sList.AxisFactor.XAxis.Ticks.Add(tk3) Dim r As New Random() For i As Integer = 0 To 3     Dim sr As New Series()     sr.Points.Width = 6     sr.Points.PointType = PointType.FillRectangle         For x As Integer = 0 To 5         Dim item As New SeriesItem()         item.Name = "item" & x.ToString()         item.XValue = x         item.YValue = r.[Next](900)                 sr.items.Add(item)     Next     sList.SeriesCollection.Add(sr) Next Me.hHippoChart1.Direction = GraphAreaLocation.Vertical Me.hHippoChart1.DesignType = ChartDesignType.Simple Me.hHippoChart1.Titles.Label.ForeColor = Color.SteelBlue Me.hHippoChart1.SeriesListDictionary.Add(sList) Me.hHippoChart1.DrawChart()