teechart图表控件的简单示例

teechart有多种图形, 饼图, 柱状图, 线图 ,散点图,组合图 ...等等....

下面是随便写的aardio调用示例,更多属性参考官方文档吧

import win.ui;
/*DSG{{*/
var winform = win.form(text="aardio form";right=834;bottom=469)
winform.add(
button={cls="button";text="demo1";left=0;top=405;right=117;bottom=469;db=1;dl=1;z=2};
button2={cls="button";text="删除第一个点";left=119;top=405;right=236;bottom=470;db=1;dl=1;z=3};
static={cls="static";text="Static";left=0;top=0;right=835;bottom=395;db=1;dl=1;dr=1;dt=1;transparent=1;z=1}
)
/*}}*/

import com.lite;
var dll = com.lite("\res\TeeChart8.ocx");
var embed = dll.createEmbed(winform.static,"{BDEB0088-66F9-4A55-ABD2-0BF8DEEC1196}"); 
var object = embed._object;

var demo1 = function(){
    //清除所有系列
 	object.RemoveAllSeries();
 	//添加
 	object.AddSeries(0);
 	//设置标题
 	object.Header.Text.Add("我的第一个线")
	//手动设置底部栏显示区间
 	//object.Axis.Bottom.SetMinMax(0, 50);
 	//手动设置左侧栏显示区间
	//object.Axis.Left.SetMinMax(0, 20);
	//不显示3d效果
	object.Aspect.View3D=false
	//自动调整最大区间
	object.AutomaticMaximum = true 
	//手动设置底部每步增加值
	//object.Axis.Bottom.Increment = 20
	//清空系列0的所有数据
	object.Series(0).Clear()
	for(i=0;200;1){
		//添加随机数据
		object.Series(0).AddXY(i,math.random(1,20),"",0x27BF13)
	}

}

demo1()

winform.button.oncommand = function(id,event){
    demo1()
}
 
winform.button2.oncommand = function(id,event){
    //手动删除指定x点的数据(下面示例为0点对应的数据)
	object.Series(0).Delete(0); 
}

 
winform.show();
win.loopMessage();
return winform;