浅谈TeeChart组件在ASP中的应用

王朝asp·作者佚名  2006-12-16
窄屏简体版  字體: |||超大  

由于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="MyChart.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 ' 标题字体是否粗体

TChart1.Header.Font.Italic = True ' 标题字体是否斜体

TChart1.Panel.MarginLeft = 3 ' 图表左边距

TChart1.Panel.Gradient.Visible = True ' 是否有底色

TChart1.Panel.Gradient.StartColor = &HB3DEF ' 图表底色开始颜色

TChart1.Panel.Gradient.EndColor = &HFACE87 ' 图表底色结束颜色

TChart1.Panel.BevelWidth = 0 ' 画布向内缩进幅度

TChart1.AddSeries(0) ' 显示图形的方式,取值范围为1 ~ 39

TChart1.Aspect.View3D = False ' False表示2D图形,True表示3D图形

TChart1.Aspect.Chart3DPercent = 10 ' 若是3D图形,表示其倾斜度

TChart1.Aspect.Zoom = 100 ' 图形显示比例

TChart1.Aspect.Orthogonal = TRUE ' 3D图表是否侧转

TChart1.Aspect.Rotation = -20 ' 如果图表是侧转的,水平侧转角度-360~360

TChart1.Aspect.Elevation = 0 ' 如果图表是侧转的,前后侧转角度-360~360

TChart1.Aspect.Perspective = 0

[1] [2] [3] 下一页

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
 
 
© 2005- 王朝網路 版權所有 導航