[.NET 2003版本]

DataAdapter

上述在設(shè)計(jì)時(shí)中的步驟可以通過一些編碼來實(shí)現(xiàn)。這使您能更加自由和完全的控制數(shù)據(jù)庫操作。

每個(gè)數(shù)據(jù)序列都擁有“DataSource”屬性，屬性決定了數(shù)據(jù)庫值（表或查詢）的來源，并且“YValues.DataMember”和“LabelMember”屬性指定我們想要繪制的字段。

將一個(gè)新的TeeChart for .NET項(xiàng)目拖拽一個(gè)新的項(xiàng)目和一個(gè)新的窗體上。

[C#]

using System.Data;

using System.Data.OleDb;

using System.Security;

using System.Security.Permissions;

private void Form1_Load(object sender, System.EventArgs e) {

            DataSet masterDataSet = new DataSet();

            Bar bar1 = new Bar(tChart1.Chart);

            try

          ;  {

           ;     OpenConnWithJet40(ref masterDataSet);

     ;           DataTable employeeTable = masterDataSet.Tables["EMPLOYEE"];

                bar1.YValues.DataMember = employeeTable.Columns["SALARY"].ToString();

                bar1.LabelMember = employeeTable.Columns["LASTNAME"].ToString();

                bar1.DataSource = employeeTable;

            }

            catch (SecurityException)

            {

                MessageBox.Show("The calling method has not been granted sufficient permission to access the Microsoft Jet 4.0 OLE DB Provider.");

            }

}

 [OleDbPermission(SecurityAction.Demand, Provider = "Microsoft.Jet.OLEDB.4.0")]

private void OpenConnWithJet40(ref DataSet masterDataSet) {

         ;   OleDbConnection testConn = new OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;" + @"Data Source=C:\Program Files\Steema Software\TeeChart for .NET v3\Sample data\TeeChart.mdb;");          

            testConn.Open();

            string strCom = "SELECT * FROM Employee";

            OleDbDataAdapter myCommand = new OleDbDataAdapter(strCom,testConn);

            myCommand.Fill(masterDataSet, "Employee");

            testConn.Close();

        }

[VB.Net]

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

            Dim MasterDataSet As New DataSet()

            Dim Bar1 As New Steema.TeeChart.Styles.Bar(TChart1.Chart)

            ;Try

                OpenConnWithJet40(MasterDataSet)

           ;     Dim employeeTable As DataTable = MasterDataSet.Tables("Employee")

                Bar1.YValues.DataMember = employeeTable.Columns("SALARY").ToString()

                Bar1.LabelMember = employeeTable.Columns("LASTNAME").ToString()

                Bar1.DataSource = employeeTable

  ;          Catch ex As Exception

                MessageBox.Show("Microsoft Jet 4.0 OLE DB Provider problem: " & ex.Message)

            End Try

End Sub

Private Sub OpenConnWithJet40(ByRef MasterDataSet As DataSet)

            Dim TestConn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=C:\Program Files\Steema Software\TeeChart for .NET v3\Sample data\TeeChart.mdb;")

            TestConn.Open()

            Dim StrCom As String = "SELECT * FROM Employee"

            Dim MyCommand As New OleDbDataAdapter(StrCom, TestConn)

            MyCommand.Fill(MasterDataSet, "Employee")

            TestConn.Close()

        End Sub

End Class

在.NET 2005版本中，稍微有一些針對2005版的變化。

[.NET 2005版本]

DataAdapter

[C#]

using System.Data;

using System.Data.OleDb;

using System.Security;

using System.Security.Permissions;

private void Form1_Load(object sender, EventArgs e)

{

            //string ConnString = SqlDataSource1.ConnectionString;      

            string sQuery = "select * from Employee";          

            //SqlConnection myConnection = new SqlConnection(ConnString);            

            string myConnString = "Driver={Microsoft Access Driver (*.mdb)};Dbq=C:\\Program Files\\Steema Software\\TeeChart for .NET v3\\Sample data\\TeeChart.mdb;Uid=Admin;Pwd=;";

            System.Data.Odbc.OdbcConnection myConnection = new System.Data.Odbc.OdbcConnection(myConnString);   

            //SqlCommand myCommand = new SqlCommand(sQuery, myConnection);

            System.Data.Odbc.OdbcCommand myCommand = new System.Data.Odbc.OdbcCommand(sQuery, myConnection);

            myConnection.Open();

            //SqlDataReader myReader = myCommand.ExecuteReader();

 ;           System.Data.Odbc.OdbcDataReader myReader = myCommand.ExecuteReader();

            int XColumn = myReader.GetOrdinal("ID");

            int YColumn = myReader.GetOrdinal("SALARY");

            int LabelColumn = myReader.GetOrdinal("LASTNAME");

      ;      Steema.TeeChart.Styles.Bar bar1 = new Steema.TeeChart.Styles.Bar(tChart1.Chart);

            while (myReader.Read())

            {

                bar1.Add(Convert.ToInt32(myReader[XColumn]), Convert.ToDouble(myReader[YColumn]), Convert.ToString(myReader[LabelColumn]));

            }

            myReader.Close();

            myConnection.Close();

}

[VB.Net]

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Loa

        Dim MasterDataSet As New DataSet()

        ;Dim Bar1 As New Steema.TeeChart.Styles.Bar(TChart1.Chart)

        Try

            OpenConnWithJet40(MasterDataSet)

            Dim employeeTable As DataTable = MasterDataSet.Tables("EMPLOYEE")

            Bar1.YValues.DataMember = employeeTable.Columns("SALARY").ToString()

            Bar1.LabelMember = employeeTable.Columns("LASTNAME").ToString()

            Bar1.DataSource = employeeTable

        Catch ex As Exception

            MessageBox.Show("Microsoft Jet 4.0 OLE DB Provider problem: " & ex.Message)

 ;       End Try

End Sub

Private Sub OpenConnWithJet40(ByRef MasterDataSet As DataSet)  

  ;      Dim TestConn As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=C:\Program Files\Steema Software\TeeChart for .NET v3\Sample data\TeeChart.mdb;")

        TestConn.Open()

      ;  Dim StrCom As String = "SELECT * FROM Employee"

        Dim MyCommand As New OleDb.OleDbDataAdapter(StrCom, TestConn)

 ;       MyCommand.Fill(MasterDataSet, "Employee")

        TestConn.Close()

    End Sub

End Class

如果數(shù)據(jù)庫的值發(fā)生改變，你要“refresh”連接并重新檢索值，你應(yīng)該這樣做：

TChart1.Series(0).CheckDataSource

“CheckDataSource”方法會(huì)迫使數(shù)據(jù)序列重新檢索所有的記錄。

所有的數(shù)據(jù)序列同樣擁有“XValues.ValueSource”屬性，這個(gè)屬性只用在XY圖表中（當(dāng)你在每個(gè)點(diǎn)都擁有X坐標(biāo)）。

單條記錄

連接到表

使用圖表編輯器將在窗體的初始化中創(chuàng)建下面的代碼。類似的代碼可用于在運(yùn)行時(shí)創(chuàng)建并連接新的單條記錄數(shù)據(jù)源。

（假設(shè)一個(gè)DataSet調(diào)用sourceTableSet的表單：sourceTable）

this.singleRecordSource1 = new Steema.TeeChart.Data.SingleRecordSource();

this.sourceTableSet.DataSetName = "NewDataSet";

this.sourceTableSet.Tables.AddRange(new System.Data.DataTable[] {this.sourceTable});

this.singleRecordSource1.DataSource = this.sourceTableSet;

this.singleRecordSource1.ValueMembers = new string[] {

                                                             "JAN",

                                                             "FEB",

                                                             "MAR"};

this.bar1 = new Steema.TeeChart.Styles.Bar();

this.bar1.DataSource = this.singleRecordSource1;

表單檢索

TeeChart的SingleRecord使用CurrencyManager組件來檢索數(shù)據(jù)庫的表單并更新到圖表。在表單中的記錄變更后應(yīng)該使用CheckDatasource來更新圖表。

例子

private CurrencyManager myCurrencyManager;

public void ConnectChartToTable()

{

     myCurrencyManager = (CurrencyManager)this.BindingContext[sourceTable];

    ; singleRecordSource1.RecordCurrency=myCurrencyManager;

     tChart1[0].CheckDataSource();

}

表單（和圖表）可以通過CurrencyManager來進(jìn)行檢索。

    private void MovePrevious()

    {

      if (myCurrencyManager.Position>0)

      {

        myCurrencyManager.Position=myCurrencyManager.Position+1;

        tChart1[0].CheckDataSource();

      }

    }

    private void MoveNext()

    {

      if (myCurrencyManager.Position<myCurrencyManager.Count)

      {

      ;  myCurrencyManager.Position=myCurrencyManager.Position+1;

        tChart1[0].CheckDataSource();

      }

    }