Ver Mensaje Individual
  #2  
Antiguo 06-11-2008
Rockin Rockin is offline
Miembro
 
Registrado: may 2003
Ubicación: Málaga
Posts: 264
Reputación: 24
Rockin Va por buen camino
Thumbs up

Para buscar el registro mayor, puedes recorrer la columna con un for o un while de la siguiente manera:

Código Delphi [-]
var
maximo_valor: float;

begin
maximo_valor:= StrToFloat(DBGrid.Cells[columnavalor,1]);

for i:= 2 to numregistros do
begin

    //esto para comprobar el valor máximo
    If  (StrToFloat(DBGrid.Cells[columnavalor,i]) > maximo_valor) then
    begin
       maximo_valor:= StrToFloat(DBGrid.Cells[columnavalor,i]);
    end; //del If

    //para operar entre dos columna

    StrToFloat(DBGrid.Cells[columnaoperando1,i - 1]) "signo operacion"  StrToFloat(DBGrid.Cells[columnaoperando2,i - 1]) 

end; // del for

  //esto es para calcular la ultima fila debido  a que hemos llegado hasta i - 1

StrToFloat(DBGrid.Cells[columnaoperando1,i]) "signo operacion"  StrToFloat(DBGrid.Cells[columnaoperando2,i]) 

end;

Yo uso el DBGrid de TMS, con el que trae delphi será parecido.
Los tipos de datos los adaptas como tu veas mejor.

Espero que te valga.
Responder Con Cita