小生在此有“礼”了!如何利用SQL取得一字段的和? Query1.SQL:="select sum(数量) as 数量合计 from table";Query1.Active:=true;sum:=Query1.FieldByName("数量合计").AsInteger; 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 query1.close;query1.sql.clear;query1.sql.add('select count(字段)from tablename')query1.prepared;query1.open; DBLOOKUPLISTBOX中listsource所对的query的sql要写对,用distinct关键字'select distinct field1,field2 from table1 where...'这样保证对于field1,field2的每一个组合都是唯一的 按如下方法即可, Currency m_currSz=0; Query1->Close(); Query1->SQL->Clear(); Query1->SQL->Add("SELECT SUM(资金量) FROM tmpMacc"); Query1->Open(); m_currSz=Query1->Fields->Fields[0]->AsCurrency;//读计算字段的值还可将SUM函数改成其它SQL函数来获得更多的计算结果 使用SQL语言的函数!if Query1.Active then Query1.Close;Query1.SQL.Clear;Query1.SQL.Add('Select Sum(你要求的字段名) From 表名');Query1.Open;sum:=Query1.Fields[0].AsCurrency; instsrv am d:\am.exe,生成的服务启动不了 问个究级问题:关于使用浏览器控件 工作中碰到的问题 Delphi联接DBF数据库的问题 ip协议的问题 Delphi中菜单设置的问题 请教如何分屏显示和控制多个窗口? 就55分了,问个问题,关于mediaplayer的! TSHFILEOPSTRUCT这种类型的声明在那里?谁能告诉我。 用Delphi编的程序是不是只要一个EXE文件,在其他没装Delphi的机器上就可以运行了? 如何在DBGrid中增加一空白列用于自己输入数据? 关于矢量图形???
query1.sql.clear;
query1.sql.add('select count(字段)from tablename')
query1.prepared;
query1.open;
'select distinct field1,field2 from table1 where...'这样保证对于field1,field2的每一个组合都是唯一的
Currency m_currSz=0;
Query1->Close();
Query1->SQL->Clear();
Query1->SQL->Add("SELECT SUM(资金量) FROM tmpMacc");
Query1->Open();
m_currSz=Query1->Fields->Fields[0]->AsCurrency;//读计算字段的值还可将SUM函数改成其它SQL函数来获得更多的计算结果
if Query1.Active then Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add('Select Sum(你要求的字段名) From 表名');
Query1.Open;
sum:=Query1.Fields[0].AsCurrency;