如何使用TeeChart实现图表

 我来答
time陌言成殇
2015-02-05 · TA获得超过8.4万个赞
知道大有可为答主
回答量:1.4万
采纳率:91%
帮助的人:9312万
展开全部

您好,很高兴为您解答。

使用 regsvr32注册ocx,就可以在程序环境中使用了,插入一个teechart控件到window里面,具体见下图


插入后就可以使用该控件了,teechart支持的图表类型很多,可以使用editor进行设置,参考下图


TeeChart主要有几个概念,一个是axis(轴),一个是series(序列),掌握了这两个基本的东西就可以进行设置和编程了。
看这一段代码:

chart.object.axis.top.visible=false //设置图表上界不显示
chart.object.axis.right.visible=false //设置图表右界不显示
chart.object.frame.visible=false   //不显示边框
chart.object.header.text.clear()   //由于teechart支持多行title,所以必须clear
chart.object.axis.left.automatic=false   //这个自动标注功能

以上的代码基本设置完成,具体的设置可以通过editor详细了解到

如何来显示坐标轴:

chart.object.axis.left.startposition=70
chart.object.axis.left.endposition=100
chart.object.axis.left.maximum=val[1]
chart.object.axis.left.minimum=0   
chart.object.axis.left.title.caption=item[1]
chart.object.axis.bottom.title.caption="勘探线"
chart.object.series(0).clear()
long hor,ver
hor=chart.object.axis.addcustom(TRUE)
ver=chart.object.axis.addcustom(FALSE)
chart.object.axis.Custom(ver).automatic=false
chart.object.axis.Custom(ver).minimum=0
chart.object.axis.custom(ver).maximum=val[2]
chart.object.axis.Custom(ver).startposition=35
chart.object.axis.Custom(ver).EndPosition = 65
chart.object.axis.Custom(ver).Title.Angle = 90
chart.object.axis.Custom(ver).Title.Caption = item[2]
chart.object.axis.Custom(hor).EndPosition = 100
chart.object.axis.Custom(hor).PositionPercent =35
 
chart.object.Series(1).VerticalAxisCustom = ver
chart.object.Series(1).HorizontalAxisCustom = hor
chart.object.series(1).clear()


这段代码是设置两个坐标轴的代码,可以参考下图


有了坐标轴,就可以显示数据了,代码如下:



chart.object.series(0).add(round(cc/nums,2),ktx,255)
chart.object.series(1).add(round(dd/nums,2),ktx,255)

   


这是向里面加了两个序列的数据,代码本来在循环里面,要加多个数据到序列,多调用几次add


如若满意,请点击右侧【采纳答案】,如若还有问题,请点击【追问】

希望我的回答对您有所帮助,望采纳!

                                                                                                                            ~ O(∩_∩)O~

推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式