Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > SQL
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 25-02-2005
jefraub jefraub is offline
Miembro
 
Registrado: feb 2005
Posts: 15
Poder: 0
jefraub Va por buen camino
Sacar un campo calculado

Hola, me gustaria saber la forma de calcular la suma del campo precio que previamente he cargado a una Dbgrid desde una consulta SQL.

Es decir, como hago referencia a distintas ocurrencias dentro de una misma DBgrid.

Muchas gracias como siempre de antemano
Responder Con Cita
  #2  
Antiguo 26-02-2005
Avatar de marcoszorrilla
marcoszorrilla marcoszorrilla is offline
Capo
 
Registrado: may 2003
Ubicación: Cantabria - España
Posts: 11.221
Poder: 10
marcoszorrilla Va por buen camino
Tendrías que ser algo más explícito, pero deduzco, que tienes una rejilla con un conjunto de datos obtenidos de una consulta y a posteriori, quieres sumar cierto campo, con ó sin condiciones.

Si es eso, no tienes, mas que hacer un bucle y recorrer la rejilla acumlando en una variable y al final del recorrido tendrás el total en dicha variable, no tendrás más que mostrarlo o guardarlo donde desees.
Código Delphi [-]
  Var
  nTotalouble;
  begin
  nTotal:=0;
  Query1.First;
  
  While not Query1.Eof do 
  begin
  nTotal:=nTotal + Query1Micampo.AsFloat;
  Query1.Next;
  end;
  
  ShowMessage('El total es: '+FormatFloat(',0.00', ntotal));

Un Saludo.
__________________
Guía de Estilo de los Foros
Cita:
- Ça c'est la caisse. Le mouton que tu veux est dedans.
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 17:40:41.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi