Steema Central

Code: Select all

   Private Sub Chart1_MouseMove(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Chart1.MouseMove
        Dim X, Y, X2, Y2 As Double

        Try
            If CursorTool1 IsNot Nothing Then
                X = CursorTool1.XValue
            Else
                X = Chart1.Axes.Bottom.CalcPosPoint(e.X)
            End If
            Y = Chart1.Axes.Left.CalcPosPoint(e.Y)
            X2 = Chart1.Axes.Top.CalcPosPoint(e.X)
            Y2 = Chart1.Axes.Right.CalcPosPoint(e.Y)

            Dim XX = X.ToString("G5")
            Dim YY = Y.ToString("G5")
            Dim XX2 = X2.ToString("G5")
            Dim YY2 = Y2.ToString("G5")
            MyMainForm1.StatusStrip.Items(0).Text = " X = " + XX
            MyMainForm1.StatusStrip.Items(1).Text = " Y = " + YY
            MyMainForm1.StatusStrip.Items(2).Text = " X2 = " + XX2
            MyMainForm1.StatusStrip.Items(3).Text = " Y2 = " + YY2
        Catch
            Dim i As Integer = 0
            For i = 0 To 3
                MyMainForm1.StatusStrip.Items(i).Text = " -"
            Next

        End Try
    End Sub

Code: Select all

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

    private Steema.TeeChart.Tools.CursorTool CursorTool1;

    private void InitializeChart()
    {
      tChart1.Dock = DockStyle.Fill;

      tChart1.Import.Template.Load(@"test2.fxy");
      tChart1.MouseMove += new MouseEventHandler(tChart1_MouseMove);

      foreach (Steema.TeeChart.Tools.Tool t in tChart1.Tools)
      {
        if (t is Steema.TeeChart.Tools.CursorTool)
        {
          CursorTool1 = (Steema.TeeChart.Tools.CursorTool)t;
        }
      }

      //Workaround suggested at http://www.teechart.net/support/viewtopic.php?f=4&t=11100#p47787
      tChart1.Axes.Left.Logarithmic = true;
      tChart1.Axes.Left.Horizontal = tChart1.Axes.Left.Horizontal;
    }

    void tChart1_MouseMove(object sender, MouseEventArgs e)
    {
      double X = 0;
      double Y = 0;
      double X2 = 0;
      double Y2 = 0;

      try
      {
        if (CursorTool1 != null)
        {
          X = CursorTool1.XValue;
        }
        else
        {
          X = tChart1.Axes.Bottom.CalcPosPoint(e.X);
        }
        Y = tChart1.Axes.Left.CalcPosPoint(e.Y);
        X2 = tChart1.Axes.Top.CalcPosPoint(e.X);
        Y2 = tChart1.Axes.Right.CalcPosPoint(e.Y);

        object XX = X.ToString("G5");
        object YY = Y.ToString("G5");
        object XX2 = X2.ToString("G5");
        object YY2 = Y2.ToString("G5");
        this.statusStrip1.Items[0].Text = " X = " + XX;
        this.statusStrip1.Items[1].Text = " Y = " + YY;
        this.statusStrip1.Items[2].Text = " X2 = " + XX2;
        this.statusStrip1.Items[3].Text = " Y2 = " + YY2;
      }
      catch
      {
        int i = 0;
        for (i = 0; i < statusStrip1.Items.Count; i++)
        {
          this.statusStrip1.Items[i].Text = " -";
        }
      }

    }

Code: Select all

      tChart1.Axes.Bottom.Increment = 0.01;

Code: Select all

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        'TChart1.Import.Template.Load("c:\test2.fxy")
        TChart1.Series.Clear()
        TChart1.Aspect.View3D = False
        '//Workaround suggested at http://www.teechart.net/support/viewtopic.php?f=4&t=11100#p47787
        TChart1.Axes.Bottom.Logarithmic = True
        TChart1.Axes.Bottom.Horizontal = TChart1.Axes.Bottom.Horizontal
        Dim Point As New Steema.TeeChart.Styles.Points(TChart1.Chart)
        For i As Integer = 2 To 5
            Point.Add(Math.Pow(10, -i), i)
        Next
    End Sub

Code: Select all

      tChart1.Clear();

      Steema.TeeChart.Data.XmlSource xmlSource1 = new Steema.TeeChart.Data.XmlSource(tChart1.Chart);
      xmlSource1.Load(@"c:\temp\UliLogData.xml");

      tChart1.Legend.Visible = false;
      tChart1.Aspect.View3D = false;

      tChart1.Axes.Bottom.Logarithmic = true;
      tChart1.Axes.Left.Logarithmic = true;

      foreach (Steema.TeeChart.Styles.Series s in tChart1.Series)
      {
        if (s is Steema.TeeChart.Styles.CustomPoint)
        {
          (s as Steema.TeeChart.Styles.CustomPoint).Pointer.Visible = true;
        }
      }

Code: Select all

      tChart1.Clear();

      for (int i = 0; i < 3; i++)
      {
        tChart1.Series.Add(new Steema.TeeChart.Styles.Line());
                
        Steema.TeeChart.Data.TextSource ts = new Steema.TeeChart.Data.TextSource();
        try
        {
          Cursor = Cursors.WaitCursor;
          ts.HeaderLines = 1;
          ts.Separator = '\t';
          ts.Series = tChart1[i];
          ts.Fields.Add(0, "X");
          ts.Fields.Add(1, "Y");
          ts.LoadFromFile(@"C:\temp\test_2\test_" + (i+1).ToString() + ".txt");
        }
        finally
        {
          Cursor = Cursors.Default;
        }
      }

      tChart1.Legend.Visible = false;
      tChart1.Aspect.View3D = false;

      tChart1.Axes.Bottom.Logarithmic = true;
      tChart1.Axes.Left.Logarithmic = true;

      foreach (Steema.TeeChart.Styles.Series s in tChart1.Series)
      {
        if (s is Steema.TeeChart.Styles.CustomPoint)
        {
          (s as Steema.TeeChart.Styles.CustomPoint).Pointer.Visible = true;
        }
      }