SUM a edit o variable
 

Buenas, como dice el titulo...Necesito que, en un ButtonX, sume todos los importes que hay en el DBGrid(dataset)...la consulta seria:

Código SQL [-]
'select SUM(importe) from FACTURA

y por algun lugar lei que guardandolo en una variable seria asi:

Código SQL [-]
'select SUM(importe) as VariableX from FACTURA

Ahora, como seria para que me lo muestre en un edit?

Código Delphi [-]
EditX.text := 'select SUM(importe) from factura';

?????????

lo unico que quiero, es que de la tabla en donde hay 10 items, sume los importes de cada uno, y me lo muestre en un editX.

Graciela

Pues la cosa es sencilla, si tu dataset es un ClientDataSet puedes activar los TAgregates, es muy sencillo trabajar con ellos... si no, solo debes recorrer el dataset e imprimir el resultado en dicho Edit, asi:

Código Delphi [-]
var
  Total: Extended;
begin
  Total := 0;
  Dataset1.DisableControls;  
  try  
    Dataset1.First;
    while not Dataset1.Eof do
    begin
      Total := Total + Dataset1.FieldByName('Importe').AsFloat;
    Dataset1.Next;
    end;

    EditX.text := FloatToStr(Total);
  finally
    Dataset1.EnableControls;
  end;
end;

Y ya.

También con una simple Consulta.

Código Delphi [-]
EditX.text:=Query1.Fields[0].AsString;

Un Saludo.

Ahhh, claro, yo lo había visto era desde el punto de vista donde es necesario sumar los registros, luego de digitar algun valor por medio de un control como el DBGrid.