Query1.Close;
Query.Sql.Text := 'SELECT SUM(Col1*Col2) AS SUM1 FROM TableName';
Query1.Open;
edit1.text:=inttostr(query1.fieldbyname('sum1').asinteger);
Query.Sql.Text := 'SELECT SUM(Col1*Col2) AS SUM1 FROM TableName';
Query1.Open;
edit1.text:=inttostr(query1.fieldbyname('sum1').asinteger);
Query.Sql.Text := 'SELECT SUM(Col1*Col2) AS SUM1 FROM TableName group by XXXX';
Query1.Open;
edit1.text:=inttostr(query1.fieldbyname('sum1').asinteger);