Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Comparar fechas (https://www.clubdelphi.com/foros/showthread.php?t=39009)

creus 08-01-2007 16:31:26

Comparar fechas
 
Hola,

Como puedo comparar una fecha??? Saber los días que faltan para llegar a una fecha determinada con respecto a una fecha anterior.

Ejemplo: 10/10/1975 ( comparar ) 12/10/1976

Faltarían 1 año y dos días.

Hay algún elemento en Delphi que me permita hacer esta comparación???

Gracias a todos un saludo.

luisgutierrezb 08-01-2007 17:04:38

pues no se si la unidad Dateutils traiga algo, yo trabajo con delphi 5, sin embargo puedes hacer:

Código Delphi [-]
var
  Fecha1, Fecha2, Resultado:TDateTime;
  Anio, Mes, Dia:Word;
begin
  Fecha1 := EncodeDate(1975,10,10);
  Fecha2 := EncodeDate(1976,10,12);
  Resultado := Fecha2 - Fecha1;
  DecodeDate(Resultado, Anio, Mes, Dia);
  ShowMessage(Format('La Diferencia es: %d Años con %d Meses y %d Dias',[Anio, mes, dia]))

barrene 19-03-2007 14:15:13

Hola creus,

En la ayuda de Delphi 7 tienes unas cuantas funciones muy útiles para el calculo de días entre dos fechas.
Por ejemplo, DaysBetween(fecha1,fecha2):integer

Sin embargo, creo que hay qeu definirla en algun apartado para que funcionen. Yo las he intentado utilizar y me dice que no están declaradas.

Espero que te sirva.

un saludo.

Besto 19-03-2007 14:27:14

Para usarla tienes que añadir en la clausula Use la unit DateUtils


La franja horaria es GMT +2. Ahora son las 16:12:53.

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