delphi中的dbchart中的饼形图怎么是一条直线
dbchart中的饼形图。无法显示。下面是代码。
with adoquery2 do
begin
close;
sql.clear;
sql.add('select commonname,sum(val(DMAF)) as i from 日粮修改表 where formula = '''+trim(combobox11.text)+''' group by commonname');
open;
end;
dbchart2.Series[0].XLabelssource:='commonname';
dbchart2.series[0].YValues.valuesource:='i';
dbchart2.series[0].DataSource:=adoquery2;
上面的代码有问题吗？为什么不显示成饼而是一条直线。愁死我了。希望高人指点。
series1.Active:=false;
series1.DataSource:=query1;
这两句就错了，你自己去改吧
我以前的：
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add('select sum(Tm) as nfield,Cjx from aaa group by Cjx');
Query1.Open;
series1.Active:=false;
series1.DataSource:=query1;
series1.xL
相关问答：
这个是拦截按键消息并测试是否为ENTER键。
begin
case wParam of
WM_KEYDOWN:
fEatKeystroke := (p.vkCode = VK_RETURN);
& ......
由于我设计得不够完善，在给Form1放上图片的时候，由于Button的底色是白色，和我图片的颜色不符，怎么把Button的底色改成图片的
button不能改颜色的,但可以用如下方法变通一下:
1 添加一个panel并改变颜色; ......
我安装的是企业版。。。
我问下， CTRL+左键 能查看 windows.pas 吗？
就是 接口里的windows。
当然可以,CTRL+左键点击Interface部分的Windows就可以了
啥啥企业版？去安装目录看看lib文件夹下有没� ......
delphi代理问题 求解 在线等
procedure TForm1.Button3Click(Sender: TObject);
var
info : INTERNET_PROXY_INFO;
reg : TRegistry;
begin
reg := TRegistry.Crea ......
