y :浮点数 //图元纵坐标
代码清单:
//aqxunit是一个tadoquery,其中sql语句为“select * from xunit”。
procedure tfrmmain.drawlayerfromdb;
var
oblayer : bindlayer;
searchlayer : layer;
ds : dataset;
begin
//使用这个过程必须保证aqxunit表已经打开!
if not aqxunit.active then
begin
givemsg('系统基础表没有打开!');//调用自定义提示方法
exit;
end;
//创建bindlayer,非常讨厌半英半汉,没办法,不会翻译^_^