Ver Mensaje Individual
  #22  
Antiguo 24-04-2004
Avatar de Al González
[Al González] Al González is offline
In .pas since 1991
 
Registrado: may 2003
Posts: 5.610
Reputación: 32
Al González Es un diamante en brutoAl González Es un diamante en brutoAl González Es un diamante en brutoAl González Es un diamante en bruto
Smile

¡Hola a todos!


Respondo a la pregunta:
Cita:
Empezado por JDNA
...saber si en el delphi hay algún comando para poder saber que número es el mayor de una lista...
Entendiendo que dicha lista es un arreglo (por lo que dice el título del tema), si dicho arreglo es de enteros (Integer), se puede utilizar la función MaxIntValue; si es de flotantes de precisión doble (Double), se puede utilizar la función MaxValue; las dos funciones pertenecen a la unidad Math de Delphi.


Adicionalmente, buscando la palabra "Mayor" en la biblioteca Delphi Interfaz GH, encuentro algunas funciones de la unidad GHMatem.pas:
Código:
  { Entero Absoluto Mayor }
  Function EnterAbsoMayo (Const Enteros :Array Of Integer) :Integer;

  { Entero de Longitud Mayor }
  Function EnterLongMayo (Const Enteros :Array Of Integer) :Integer;

  { Entero Mayor }
  Function EnterMayo (Const Enteros :Array Of Integer) :Integer;

  { Número de Longitud Mayor }
  Function NumerLongMayo (Const Numeros :Array Of Extended) :Extended;

  { Número Mayor }
  Function NumerMayo (Const Numeros :Array Of Extended) :Extended;
EnterMayo es como MaxIntValue, pero con la ventaja de que puede recibir un arreglo vacío, en cuyo caso devuelve 0 (MaxIntValue asume que el arreglo tiene por lo menos un elemento).

NumerMayo es como MaxValue, pero en lugar de recibir un arreglo de valores Double recibe un arreglo de valores Extended (el tipo estándar de las constantes de punto flotante en Delphi), además de que dicho arreglo puede estar vacío, en cuyo caso devuelve 0 (MaxValue asume que el arreglo tiene por lo menos un elemento).

Les invito a que conozcan esta biblioteca de funciones. En ella encontrarán muchas funciones con las cuales solucionar facilmente cientos de problemas comunes relacionados con números, arreglos, cadenas de caracteres, punteros, memoria, objetos, gramática, etc.

Espero esto sea de utilidad. Seguimos en contacto.

Al González .
Responder Con Cita