【TeeChart Pro ActiveX教程】（十二）：導入和導出圖表（下）

---

下載TeeChart Pro ActiveX最新版本

導出數據

系列數據有四種導出格式：

• 文字：TextFormat類
• XML：XMLFormat類
• HTML：HTMLFormat類
• Excel：ExcelFormat類

上述組件可以與圖表系列相關聯，從中可以將數據導出為文件，流或剪貼板。以下示例將圖表系列中的數據導出到HTML表：

[C＃]

private void Form1_Load(object sender, System.EventArgs e)  
            Random rnd = new Random(); 
            char c = new char(); 
 
            for(int i = 0; i < 10; ++i)  
                c = Convert.ToChar(65 + i); 
                bar1.Add(Convert.ToDouble(i),rnd.Next(100),c.ToString(),Color.Red); 
             
            Steema.TeeChart.Export.DataExport dataExport = new Steema.TeeChart.Export.DataExport(tChart1.Chart); 
            dataExport.HTML.IncludeHeader = true; 
            dataExport.HTML.IncludeIndex = true; 
            dataExport.HTML.IncludeLabels = true; 
            dataExport.HTML.Series = bar1; 
            dataExport.HTML.Save(@"C:.htm"); 

[VB.Net]

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
            Dim C As New Char() 
            Dim i As New Integer() 
 
            For i = 0 To 10 
                C = Convert.ToChar(65 + i) 
                Bar1.Add(Convert.ToDouble(i), Rnd() * 100, C.ToString(), Color.Red) 
            Next 
            Dim DataExport As New Steema.TeeChart.Export.DataExport(TChart1.Chart) 
            DataExport.HTML.IncludeHeader = True 
            DataExport.HTML.IncludeIndex = True 
            DataExport.HTML.IncludeLabels = True 
            DataExport.HTML.Series = Bar1 
            DataExport.HTML.Save("C:.htm") 
End Sub 

帶有隨機數據集的上述輸出如下：

<table border="1"> 
<tr><td>Index</td><td>Text</td><td>bar1</td></tr> 
<tr><td>0</td><td>A</td><td>69</td></tr> 
<tr><td>1</td><td>B</td><td>93</td></tr> 
<tr><td>2</td><td>C</td><td>18</td></tr> 
<tr><td>3</td><td>D</td><td>88</td></tr> 
<tr><td>4</td><td>E</td><td>42</td></tr> 
<tr><td>5</td><td>F</td><td>33</td></tr> 
<tr><td>6</td><td>G</td><td>58</td></tr> 
<tr><td>7</td><td>H</td><td>43</td></tr> 
<tr><td>8</td><td>I</td><td>63</td></tr> 
<tr><td>9</td><td>J</td><td>49</td></tr> 
</table> 

TeeChart的'Ten'模板和數據導出/導入格式

ten文件

ten文件是TeeChart自己的模板格式，用于保存圖表及其數據。 修改的圖表屬性隨模板一起保存，并在模板導入新圖表時重現。 好處：

• 十個文件的大小非常小，在大多數情況下，它提供了優于純圖形格式（qicker）的優勢。
• 模板的目標圖表是“實時”，可以進行縮放和滾動，并修改其屬性。
• 根據您的偏好，數據可以選擇包含在十個模板中。

[C＃]

private void button1_Click(object sender, System.EventArgs e)  
            saveFileDialog1.Filter = "TenFile (.ten)|*.ten"; 
            saveFileDialog1.ShowDialog(); 
            if(saveFileDialog1.FileName != "")  
                tChart1.Export.Template.IncludeData = true; 
                tChart1.Export.Template.Save(saveFileDialog1.FileName); 

[VB.Net]

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 
        SaveFileDialog1.Filter = "TenFile (.ten)|*.ten" 
        SaveFileDialog1.ShowDialog() 
        If SaveFileDialog1.FileName <> "" Then 
            TChart1.Export.Template.IncludeData = True 
            TChart1.Export.Template.Save(SaveFileDialog1.FileName) 
        End If 
End Sub 

導入

導入XML到TeeChart

從TextBox導入XML。

[C＃]

protected override void button1_Click(object sender, System.EventArgs e)  
            tChart1.Series.RemoveAllSeries(); 
            Steema.TeeChart.Styles.Points points1 = new Steema.TeeChart.Styles.Points(tChart1.Chart); 
            points1.Title = "Points Series"; 
            xmlSource1.Series = points1; 
            xmlSource1.SeriesNode = "Points Series"; 
            xmlSource1.Load(textBox2.Text); 
 
 
            tChart1.Refresh(); 

從URL導入XML。

[C＃]

protected override void button2_Click(object sender, System.EventArgs e)  
            tChart1.Series.RemoveAllSeries(); 
            xmlSource1.Chart = tChart1.Chart; 
            xmlSource1.Load("//www.steema.com/SampleNETData.xml"); 
 
            tChart1.Refresh(); 
         

導入ten格式文件

從本地文件源或http數據源導入已保存的Tee文件。

例，從文件導入

[C＃]

tChart1.Import.Template.LoadFileDialog(); 

[VB.Net]

TChart1.Import.Template.LoadFileDialog() 

URL

[C＃]

tChart1.Import.Template.FromURL("//www.berneda.com/demo.ten"); 

[VB.Net]

TChart1.Import.Template.FromURL("//www.berneda.com/demo.ten") 

Stream

[C＃]

System.IO.MemoryStream tenStream = new System.IO.MemoryStream(); 
tChart1.Export.Template.Save(tenStream); 
tChart2.Import.Template.Load(tenStream); 

[VB.Net]

Dim TenStream As New System.IO.MemoryStream() 
TChart1.Export.Template.Save(TenStream) 
TChart2.Import.Template.Load(TenStream) 

在導入時所做更改的效果

效果僅保存對標準圖表定義的更改，如果目標圖表包含未導入要導入的圖表的屬性更改，則原件將繼續執行。一個例子是圖表頁腳。如果.ten文件未設置頁腳并且目標圖表具有，則頁腳將在導入后通過圖表顯示。這可能是理想的結果。如果您希望在導入圖表后對導入圖表進行更改可能會對所需結果產生負面影響，那么您可以創建圖表的新實例，如下例所示：

[C＃]

private void Form1_Load(object sender, System.EventArgs e)  
        Bar bar1 = new Bar(tChart1.Chart); 
        bar1.FillSampleValues(20); 
 
private void button1_Click(object sender, System.EventArgs e)  
        saveFileDialog1.Filter = "TenFile (.ten)|*.ten"; 
        saveFileDialog1.ShowDialog(); 
        if(saveFileDialog1.FileName != "")  
            tChart1.Export.Template.IncludeData = true; 
            tChart1.Export.Template.Save(saveFileDialog1.FileName); 
         
 
private void button2_Click(object sender, System.EventArgs e)  
        tChart1.Dispose(); 
        tChart1 = new Steema.TeeChart.TChart(); 
        ini_Chart(); 
 
private void ini_Chart()  
        this.tChart1.Header.Lines = new string[] "TeeChart"; 
        this.tChart1.Location = new System.Drawing.Point(24, 24); 
        this.tChart1.Name = "tChart1"; 
        this.tChart1.Size = new System.Drawing.Size(400, 240); 
        this.tChart1.TabIndex = 5; 
        this.Controls.AddRange(new System.Windows.Forms.Control[] this.tChart1); 
 
private void button3_Click(object sender, System.EventArgs e)  
        tChart1.Import.Template.LoadFileDialog(); 
 

[VB.Net]

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
        Dim Bar1 As New Steema.TeeChart.Styles.Bar(TChart1.Chart) 
        Bar1.FillSampleValues(20) 
End Sub 
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 
        SaveFileDialog1.Filter = "TenFile (.ten)|*.ten" 
        SaveFileDialog1.ShowDialog() 
        If Not SaveFileDialog1.FileName = "" Then 
            TChart1.Export.Template.IncludeData = True 
            TChart1.Export.Template.Save(SaveFileDialog1.FileName) 
        End If 
End Sub 
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click 
        TChart1.Dispose() 
        TChart1 = New Steema.TeeChart.TChart() 
        Ini_Chart() 
End Sub 
Private Sub Ini_Chart() 
        Me.TChart1.Header.Lines = New String() "TeeChart" 
        Me.TChart1.Location = New System.Drawing.Point(16, 16) 
        Me.TChart1.Name = "TChart1" 
        Me.TChart1.Size = New System.Drawing.Size(400, 296) 
        Me.TChart1.TabIndex = 3 
        Me.Controls.AddRange(New System.Windows.Forms.Control() Me.TChart1) 
End Sub 
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click 
        TChart1.Import.Template.LoadFileDialog() 
End Sub 

購買TeeChart Pro AciveX正版授權，請點擊“”喲！