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
Ïà¹ØÎÊ´ð£º
ÈçÌâ¡£
¸Ð¾õÈçºÎ£¿½»Á÷Ï¡£
ûÓÐÑо¿¹ý£¬ºÇºÇ
ÓÐɶÑо¿Í·£¿
ÄǸö¶«Î÷£¬ÊǸö¼¦Àߣ¬£¬Ã»ÓÐʲôÒâ˼£¬·¢ÏÖ£¡£¡
ÓÃÀ´×öB/S¼Ü¹¹µÄMISϵͳµÄ»°Ó¦¸Ã¿ÉÒÔÌá¸ß½çÃæ¿ª·¢µÄЧÂʰɣ¿
ÒòΪ²»ÊìϤDelphi £ ......
delphiÈçºÎÏòAccessÊý¾Ý±íÖÐ×Ô¶¨Òå×Ö¶Î?È»ºóÏÔʾµ½DBGridÖÐ
ÔõôûÈËÀíÎÒѽ
·Ö·Ö߯ÉÙßÖ£¬Ò»°ãÈ˶¼ÀÁµÃ½øÀ´¡¡*^_^*
SQL
creat table TableName(ID Counter Primary Key,FieldName varchar(20))
ADOQue ......
ÎÒÓÃftpÉÏ´«Ò»¸öÎļþµ½ftp·þÎñÆ÷ÉÏ£¬Ç°¼¸Ìì¶¼Óõĺúõģ¬ºóÃæÒ»Ö±µ½ÏÖÔÚÁ¬²»ÉÏftpÁË
-------------------------------------
IdHTTP1:=TIdHTTP.Create(GetIP); //Ϊ·ÀÖ¹¶ÏÍøºóidhttpÎÞ·¨Æô¶¯ÆðÀ´,ËùÒÔ ......
//ÏÂÃæÊÇÒ»¼Ç¼£¬ÈýÎ¬×ø±ê
type
Tposition = record
x:integer;
y:integer;
z:integer;
end;
//======ÏÂÃæÊÇÒªÔÚÒ»¸öÑ»· ......
ÓÉÓÚÎÒÉè¼ÆµÃ²»¹»ÍêÉÆ£¬ÔÚ¸øForm1·ÅÉÏͼƬµÄʱºò£¬ÓÉÓÚButtonµÄµ×É«Êǰ×É«£¬ºÍÎÒͼƬµÄÑÕÉ«²»·û£¬Ôõô°ÑButtonµÄµ×É«¸Ä³ÉͼƬµÄ
button²»ÄܸÄÑÕÉ«µÄ,µ«¿ÉÒÔÓÃÈçÏ·½·¨±äͨһÏÂ:
1 Ìí¼ÓÒ»¸öpanel²¢¸Ä±äÑÕÉ«; ......