FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Dias Transcurridos
Hola a Todos:
Tengo problemas con dos fechas lo unico que quiero es saber cuantos dias an transcurrido de una fecha a otra sin meses ni nada solo los dias estoy probando varias cosas con fechas pero me resultas cosas raras como numeros negativos y cosas haci porfa ayudenme Gracias de antemano. |
#2
|
|||
|
|||
Hola:
Mira si te sirve esta función: Código:
function DiasEntreFechas (d1, d2 : TDateTime) : Integer; begin result := DateTimeToTimeStamp(d2).Date - DateTimeToTimeStamp(d1).Date; end; |
#3
|
||||
|
||||
Si no quieres reinventar la rueda y utilizas Delphi 6 puedes utilizar la función DaysBetween de la unit DateUtils
Saludos. |
#4
|
|||
|
|||
Muchas Gracias me sivio bien lode DateTimeToTimeStamp
por otra parte utilizo Delphi 3 y 4. |
#5
|
|||
|
|||
marcsc escribió:
Cita:
Salu2 |
#6
|
|||
|
|||
Eso o restar las dos fechas (mejor lo del Delphi 6, pero en su falta)
La parte entera es el número de días... NumDias := Trunc(Fecha1 - Fecha2); |
#7
|
|||
|
|||
Hola:
Tienes razón, Bacterion, así es más sencillo, aunque la solución que tu planteas nos obliga a viajar hacia atrás en el tiempo confiando en que se cumpla la teoría de la relatividad por la que el binomio espacio-tiempo es una linea curva que tarde o temprano se vuelve a encontrar, y tal vez si hoy es 4-06-2003 y queremos llegar al 7-06-2003 haya que recorrer una cantidad de años considerable. Mejor sería así: NumDias := Trunc(Fecha2 - Fecha1); Un saludo |
#8
|
|||
|
|||
Prefiero los Deloran, para esos menesteres,
¡pero tampoco dije que fecha puse en Fecha1 ni en Fecha2! |
|
|
|