求和赋值的问题？？

Question

我想用query控件在数据库同一产品里将单价和数量乘积总和计算并取出来后，将结果赋给窗体内的edit组件，这个代码怎么写呀？？在哪里写呀？？请指教？？

Answer 1

在Query打开后:
edit1.text:=Query1.Fields[0].AsString;

Answer 2

Query.Close;
Query.SQL.Text := 'SELECT SUM(单价*数量) AS U FROM 表 GROUP BY 产品名';
Query.Open;Edit.Text := Query.FieldByName('U').AsString;

Answer 3

Query.Close;
Query.SQL.Text := 'SELECT 产品ID,SUM(单价*数量) AS U FROM 表 GROUP BY 产品ID';
Query.Open;
Edit.Text := Query.FieldByName('U').AsString;

Answer 4

with Query do
begin
  Close;
  SQL.Clear;
  SQL.Text := 'SELECT 产品ID,SUM(单价*数量) AS U FROM 表 GROUP BY 产品ID';
  Open;
end;
Edit.Text := Query.FieldByName('U').AsString;

Answer 5

SQL SERVER数据库： 
fhuibo(Sailor) 
SELECT 产品ID, SUM(单价*数量) AS U FROM 表 GROUP BY 产品IDOracle数据库
SELECT 产品ID,SUM(NVL（单价，0）*NVL（数量，0）)  U FROM 表 GROUP BY 产品ID