设为首页 加入收藏 网站搜索 繁體中文 中国建站网 — 站长资源分享平台

浅谈TeeChart组件在ASP中的应用

来源:网络收集 作者:佚名 时间:2007-04-25 18:50:12

      由于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("/images/NullPic.gif"),False,JPEGBestQuality,100,TChart1.Width, TChart1.Height

       Set TChart1 = nothing

%>

<img src="/images/NullPic.gif">

</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("/images/NullPic.gif"),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

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

Tags:

  • 好的评价 如果您觉得好,就请您
      0%(0)
  • 差的评价 如果您觉得差,就请您
      0%(0)
  • 相关文章
    广告赞助

    文章随便看看 设计素材 建站学院 网页模板 视频教程

    网友评论

    共有 0 位网友发表了评论,得分 0 分,平均 0 分    查看完整评论

    用户名: 查看更多评论

    分 值:100分 85分 70分 55分 40分 25分 10分 1分

    内 容:

             通知管理员 验证码: