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

ASP
对ASP和ASP程序员的一些话
10行代码让你告别Arp作恶导致的掉线
ASP开发10条经验总结
国内ASP应用,不容乐观
ASP利用Google实现在线翻译功能
如何提高自己的编程水平
经典实用的基础asp程序整理
ASP实现带进度条的测试网速的代码程序
ASP程序实现网页伪静态页源代码
净化网络环境 ASP程序实现过滤脏话
ASP技术与PHP,CGI,JSP等技术的比较
用ASP制作饼图、柱状图等
常用ASP脚本程序集锦
用ASP编写的俄罗斯方块游戏
几种优秀的开发ASP的工具
浅谈ASP编程的思路与纠错
一个测试数据库连接的函数
ASP读写注册表
怎样用ASP程序判断一个盘上是否有文件
一个免费的简单聊天室源代码

浅谈TeeChart组件在ASP中的应用


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 101 ::
收藏到网摘: 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