Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   SQL (https://www.clubdelphi.com/foros/forumdisplay.php?f=6)
-   -   calcular el nro de dias, desde una fecha hasta la actual. (https://www.clubdelphi.com/foros/showthread.php?t=46273)

abraham 27-07-2007 18:19:33

calcular el nro de dias, desde una fecha hasta la actual.
 
hola amigos,

alguien tiene alguna funcion para calcular el nro de dias, desde una fecha hasta la actual.

dias:= (ffinal- finicial)

delphi.com.ar 27-07-2007 18:26:14

Unit DateUtils función DaysBetween.

Saludos!

abraham 27-07-2007 18:27:42

me podrias dar un ejemplo
 
no he utilizado esta funcion, gracias

ContraVeneno 27-07-2007 19:03:43

Escribe "DaysBetween" en delphi, coloca el cursor sobre lo que escribiste y presiona F1. ;)

poliburro 27-07-2007 19:14:58

Cita:

Empezado por abraham
hola amigos,

alguien tiene alguna funcion para calcular el nro de dias, desde una fecha hasta la actual.

dias:= (ffinal- finicial)

Imagino que preguntas sobre una función de Sql, pero, que motor de base de datos utilizas?

abraham 27-07-2007 22:25:25

Utilizo Interbase 6.0
 
Estoy Preto A Recibir Otras Formas De Realizar Esto

abraham 27-07-2007 22:28:17

GRACIAS Eärandir Sîrfalas
 
Código Delphi [-]
Unit DateUtils 
var i:integer;
begin
  i:= DaysBetween(DateTimePicker2.DateTime,DateTimePicker1.DateTime);
  Edit1.Text:=inttostr(i);
end;


con esto basto, no fue necesario el hp.

Muchisimas gracias, me gustaria saber si tambien puedo optener la diferencia de meses, ya q utilizo una funcion muy larga para esto.

Espero prota respuesta.

ContraVeneno 27-07-2007 22:45:39

En delphi, presiona F1 y en la ventanita que te salga, en la opción de búsqueda, escribe "MonthsBetween" y te va a salir la explicación y chance hasta un ejemplo.

O puedes primero escribir "MonthsBetween" en delphi, colocar el cursor sobre la palabra y presionar F1.

Regla #372456 del manual de [Inserte Nombre del Programa]:
Consulta la ayuda de [Inserte nombre de Programa] presionando F1

:D:o

migvaz5 01-08-2007 08:18:54

Otro Procedimieto tonto
 
puedes hacer la fecha a numerica e invertirla de posicion

por ejemplo 1/2/2007 quedaria asi 200721
asi puedes restar los dias

mi ejemplo es este
con un button y dos Datetimepickers

Código Delphi [-]
Unit DateUtils 

var i:integer;
begin
   i:= DaysBetween(DateTimePicker2.DateTime,DateTimePicker1.DateTime);
   Edit1.Text:=inttostr(i);
end;
se que es un poco tonto pero funciona

//Edite: Para colocar etiquetas Delphi...

abraham 01-08-2007 15:20:46

Compadre
 
Este Codigo No Es El Mismo Q Yo Hice Arriba?.
Fijate Bien

jhonny 01-08-2007 15:46:39

Cita:

Empezado por migvaz5
se que es un poco tonto pero funciona

Pues no, no es un procedimiento tonto, de hecho y asi este repetido, es lo que abraham, necesitaba.
Pero una cosa, señores abraham y migvaz5, usen las etiquetas Delphi, por favor... para que sea mas legible su codigo.

defcon1_es 01-08-2007 17:04:30

Para calcular el número de dias transcurridos entre dos fechas, basta con restar la menor a la mayor, porque TDateTime, al fin y al cabo es un Double, donde la parte entera corresponde a la fecha y la parte decimal corresponde a la hora:
Código Delphi [-]
function NumeroDias(const fecha1, fecha2: TDateTime): String;
begin
  if fecha1 < fecha2 then
    Result := IntToStr(Trunc(fecha2 - fecha1))
  else
    Result := IntToStr(Trunc(fecha1 - fecha2));
end;

abraham 01-08-2007 17:20:29

compadre como uso las etiquetas delphi?
 
todo el mundo me dice eso, me puedes orientar , ha y disculpe la ignorancia

jhonny 01-08-2007 17:36:42

Cita:

Empezado por abraham
todo el mundo me dice eso, me puedes orientar , ha y disculpe la ignorancia

Cuando estés escribiendo, selecciona el codigo y presiona el botón con el icono de Delphi... asi:

http://neftali.clubdelphi.com/images...axisDelphi.png


La franja horaria es GMT +2. Ahora son las 17:27:45.

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