Steema Central

Code: Select all

Protected WithEvents WebChart1 As Steema.TeeChart.Web.WebChart
Private CandleSeries1 As Steema.TeeChart.Styles.Candle
Private Chart1 As Steema.TeeChart.Chart

Code: Select all

Public Sub GenerateTeeChart(ByVal tab As DataTable)
//this is what the examples code illustrated in the help documentation
Chart1 = WebChart1.Chart
CandleSeries1 = New Steema.TeeChart.Styles.Candle
Chart1.Series.Add(CandleSeries1)
CandleSeries1.YValues.DataMember = tab.Columns("Throughput").ToString()
CandleSeries1.LabelMember = tab.Columns("Time").ToString()
CandleSeries1.DataSource = tab
Chart1.Legend.Visible = True
Chart1.Axes.Bottom.Labels.Angle = 90
Steema.TeeChart.Themes.ColorPalettes.ApplyPalette(Chart1.Chart, 7)
End Sub

Code: Select all

CandleSeries1.CheckDataSource

Code: Select all

		public Form1()
		{
			InitializeComponent();
			InitializeChart();
		}		

		private void InitializeChart()
		{
			DataSet ds = new DataSet("NewDataSet");
			System.IO.FileStream fstr = new System.IO.FileStream(@"C:\Inetpub\wwwroot\SteemaTest\CommStats.xml", System.IO.FileMode.Open, System.IO.FileAccess.Read);
			ds.ReadXml(fstr);
			DataTable tab = new DataTable("TrendView");
			tab = ds.Tables[0];
			fstr.Close();

			DataColumn DTIME = new DataColumn("DTIME", Type.GetType("System.DateTime"));
			tab.Columns.Add(DTIME);

			for (int i = 0; i < tab.Rows.Count; i++)
			{
				string tmpStr = tab.Rows[i][0].ToString();
				DateTime tmpDate = Convert.ToDateTime(tmpStr);
				tab.Rows[i][tab.Columns.Count - 1] = tmpDate;
			}

			GenerateTeeChart(tab);
		}

		public void GenerateTeeChart(DataTable tab)
		{			
			tChart1.Legend.Visible = true;
			tChart1.Axes.Bottom.Labels.Angle = 90;
			Steema.TeeChart.Themes.ColorPalettes.ApplyPalette(tChart1.Chart, 7);

			Steema.TeeChart.Styles.Line Line1 = new Steema.TeeChart.Styles.Line(tChart1.Chart);

			Line1.Clear();
			Line1.XValues.DateTime = true;
			Line1.DataSource = tab;			
			Line1.YValues.DataMember = "Throughput";
			Line1.XValues.DataMember = "DTIME";
			Line1.LabelMember = "Time";
			Line1.CheckDataSource();
		}

Code: Select all

    Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim ds As New DataSet("NewDataSet")
        Dim fstr As New FileStream(Server.MapPath(".") & "/CommStats.xml", FileMode.Open, FileAccess.Read)
        ds.ReadXml(fstr)
        Dim tab As New DataTable("TrendView")
        tab = ds.Tables(0)
        fstr.Close()

        Dim DTIME As DataColumn = New DataColumn("DTIME", Type.GetType("System.DateTime"))
        tab.Columns.Add(DTIME)

        For i As Integer = 0 To tab.Rows.Count - 1
            Dim tmpStr As String = tab.Rows(i)(0).ToString
            Dim tmpDate As DateTime = Convert.ToDateTime(tmpStr)
            tab.Rows(i)((tab.Columns.Count - 1)) = tmpDate
        Next

        GenerateTeeChart(tab)
    End Sub
    Public Sub GenerateTeeChart(ByVal tab As DataTable)
        Response.Write("rowcount=" & tab.Rows.Count & ", " & tab.Columns(0).ColumnName & ", " & tab.Columns(2).ColumnName)
        Chart1 = WebChart1.Chart
        Dim Line1 As New Steema.TeeChart.Styles.Line(Chart1.Chart)

        Chart1.Legend.Visible = True
        Chart1.Axes.Bottom.Labels.Angle = 90
        Steema.TeeChart.Themes.ColorPalettes.ApplyPalette(Chart1.Chart, 7)

        Line1.XValues.DateTime = True

        Line1.Clear()
        Line1.DataSource = tab
        Line1.YValues.DataMember = "Throughput"
        Line1.XValues.DataMember = "DTIME"
        Line1.LabelMember = "Time"

        Line1.CheckDataSource()
    End Sub

Code: Select all

		void points1_GetPointerStyle(Steema.TeeChart.Styles.CustomPoint series, Steema.TeeChart.Styles.GetPointerStyleEventArgs e)
		{
			if (tab.Rows[2][e.ValueIndex] == 1)
			{
				e.Color = Color.Blue;
			}
			else 
			{
				e.Color = Color.Red;
			}
		}