Ver Mensaje Individual
  #4  
Antiguo 11-10-2005
Avatar de vtdeleon
vtdeleon vtdeleon is offline
Miembro
 
Registrado: abr 2004
Ubicación: RD & USA
Posts: 3.236
Reputación: 23
vtdeleon Va por buen camino
Saludos

De la única forma que veo que se puede hacer es:
Código Delphi [-]
var
  Sum,Prom,Mayor:real;
  Regs:integer;
begin
  Mayor:=0;
  with table1 do begin
    open;
    first;
    while not eof do begin
      Sum:=Sum+FieldByName('campo').AsFloat;
      inc(Regs);
      if mayor'campo').AsFloat then
        Mayor:=FieldByName('campo').AsFloat;
      Next;
    end;
    Prom:=Sum/Regs;
    Close;
  end;
end;
Esto robaría recursos del sistema.
Lo mejor es que busques en Google algun manual(de los miles que hay) e investigue y aprendas la Sentencias
Con SQL
Código SQL [-]
Select (Sum(campo)/count(campo)) as promedio
from tabla
Y solo con esta linea, obtienes el promedio
__________________
Van Troi De León
(Not) Guía, Code vB:=Delphi-SQL, ¿Cómo?
Viajar en el tiempo no es teóricamente posible, pues si lo fuera, ya estarían aqui contándonos al respecto!
Responder Con Cita