当前位置: 首页 > 图文教程 > 网络编程 > ASP > 浅谈TeeChart组件在ASP中的应用

ASP
ASP基础讲座(下)
解决IIS5 HTTP500内部错误
ASP 3.0高级编程(四十六)
ASP 3.0高级编程(四十五)
ASP 3.0高级编程(四十四)
ASP 3.0高级编程(四十三)
ASP 3.0高级编程(四十二)
ASP 3.0高级编程(四十一)
ASP 3.0高级编程(三十九)
ASP 3.0高级编程(三十八)
ASP 3.0高级编程(三十七)
ASP 3.0高级编程(三十六)
ASP 3.0高级编程(三十五)
ASP 3.0高级编程(三十四)
ASP 3.0高级编程(三十三)
ASP 3.0高级编程(三十二)
ASP 3.0高级编程(三十一)
ASP错误代码说明
jscript错误代码及相应解释大全
ASP错误处理

浅谈TeeChart组件在ASP中的应用


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 67 ::
收藏到网摘: n/a

 

      由于TeeChart VCL 版本广泛应用于多种开发环境并得到很好的认可,西班牙Steema Software SL公司于1997年10月又开发了TeeChart Pro ActiveX。对于B/S的开发模式无疑是一个好消息,由于它只需安装在服务器端,客户端无需安装其他软件,只要使用通用浏览器即可显示统计图形,因此一面市更是又一次得到极大的欢迎。

       下面我们结合ASP技术介绍一下TeeChart Pro V5 ActiveX组件常用属性及应用。

       我们先来看一个以TeeChart组件来显示"季度销售量"情况的二维柱状图实例:

<HTML><BODY>

<%’-----------TeeChartEg.asp------------------------

       Set TChart1 = CreateObject("TeeChart.TChart")

       TChart1.Header.Text(0)="季度销售量统计" 

       TChart1.AddSeries(1)

       TChart1.Aspect.View3D=0

       TChart1.Series(0).Clear

       TChart1.Series(0).Add 180, "1季度",RGB(35,70,128)

       TChart1.Series(0).Add 240, "2季度",RGB(255,80,128) 

       TChart1.Series(0).Add 210, "3季度",&HFACE87

       TChart1.Series(0).Add 280, "4季度",16777215

       TChart1.Export.SaveToJPEGFile server.mappath("MyChart.jpg"),False,JPEGBestQuality,100,TChart1.Width, TChart1.Height

       Set TChart1 = nothing

%>

<img src="/upload/tech/20091103/20091103101446_e6b4b2a746ed40e1af829d1fa82daa10.jpg">

</BODY></HTML>

1)同ASP其他组件的使用方法相同,首先创建对象。

       Set TChart1 = CreateObject("TeeChart.TChart")

2)利用其属性显示一个静态的统计图形。

       TChart1.Header.Text(0)="季度销售量统计" 

              ……

       TChart1.Series(0).Add 210, "3季度",&HFACE87

       TChart1.Series(0).Add 280, "4季度",16777215

3)生成统计图形文件

       TChart1.Export.SaveToJPEGFile server.mappath("MyChart.jpg"),False,JPEGBestQuality,100,TChart1.Width, TChart1.Height

4)释放对象

       Set TChart1 = nothing

       上例中对象类的很多属性都是默认值,我们可以根据具体情况进行添加设置。下面详细介绍一下TeeChart组件的其他常用属性(采用程序注释的形式列出)

<HTML> <HEAD><TITLE>TeeChart对象的属性方法介绍</TITLE></HEAD>

<BODY>

<%

       Set TChart1 = CreateObject("TeeChart.TChart")

       TChart1.Height = 440                     ' 整个图表的高度

       TChart1.Width = 500                      ' 整个图表的宽度

       'TChart1.Header.Text.Clear

       'TChart1.Header.Text.Add "季度销售量统计"  ' 图表标题,方式也可采用   TChart1.Header.Text(0)="标题"形式

       TChart1.Header.Font.Size = 22              ' 标题字体大小

       TChart1.Header.Font.Bold = True            ' 标题字体是否粗体

     &nbs