Select Sum(Field) as Sum_Result from Tableaa := FieldByName('Sum_Result').AsString;
procedure TForm1.Button1Click(Sender: TObject); var s:string; begin form1.Query1.Close; form1.Query1.SQL.Clear; form1.Query1.SQL.Add('select sum(field) as sun from "e:\练习\as.db"'); form1.Query1.Open; s:=inttostr(form1.Query1.FieldValues['sun']); showmessage(s); 其中sun是query中用来存放sum(field)的字段名
AdoQuery1.Close; AdoQuery1.Sql.Clear; AdoQuery1.Sql.Add('Select Sum(Field) as xx From Table'); AdoQuery1.Open; aa:=AdoQuery1.FieldByName('xx').AsString;
var
s:string;
begin
form1.Query1.Close;
form1.Query1.SQL.Clear;
form1.Query1.SQL.Add('select sum(field) as sun from "e:\练习\as.db"');
form1.Query1.Open;
s:=inttostr(form1.Query1.FieldValues['sun']);
showmessage(s);
其中sun是query中用来存放sum(field)的字段名
AdoQuery1.Sql.Clear;
AdoQuery1.Sql.Add('Select Sum(Field) as xx From Table');
AdoQuery1.Open;
aa:=AdoQuery1.FieldByName('xx').AsString;
而是AdoQuery1.FieldByName('xx').Value;