Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 14-04-2005
davidgaldo davidgaldo is offline
Miembro
 
Registrado: nov 2003
Posts: 220
Poder: 21
davidgaldo Va por buen camino
dudas con fechas

Hola, a ver si logro explicarme. Mi pregunta es la siguiente, yo introduzco dos fechas por ejemplo 14/04/2005 y 24/04/2005, luego para cada día tengo que hacer unas operaciones, pero como hago el bucle que recorra las fechas es decir:
-desde el 14/04/2005 hasta el 24/04/2005
-begin
-operaciones
-avanzar fecha
-end

Gracias a todos por vuestra ayuda.
Responder Con Cita
  #2  
Antiguo 14-04-2005
jplj jplj is offline
Miembro
 
Registrado: oct 2003
Posts: 189
Poder: 21
jplj Va por buen camino
Si la fechas las obtienes en formato de cadena, pasalas a fecha con StrToDateTime y luego en cada ciclo del bucle añadele un día con EncodeDate.

Un Saludo.
__________________
Sonríe. Mañana puede ser peor.
Responder Con Cita
  #3  
Antiguo 14-04-2005
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
O bien con IncDay de la unidad DateUtils (al menos en Delphi 7):

Código Delphi [-]
Fecha := FechaInicio;

while CompareDate(Fecha, FechaFinal) = LessThanValue do
begin
  {
    operaciones
  }

  // Incrementar un día
  Fecha := IncDay(Fecha);
end;

// Saludos
Responder Con Cita
  #4  
Antiguo 14-04-2005
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Poder: 29
Lepe Va por buen camino
O tambien sumandole 1 a la fecha:

Código Delphi [-]
  fecha := fecha +1 ;

saludos
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.
Responder Con Cita
  #5  
Antiguo 14-04-2005
Avatar de hermes_32
hermes_32 hermes_32 is offline
Miembro
 
Registrado: jul 2003
Posts: 94
Poder: 21
hermes_32 Va por buen camino
Bueno la resta de las 2 fechas te da el número de días entre ellas.

Fecha1 := 14/04/2005;
Fecha2 := 24/04/2005;
FechaIni := Fecha1;

NumDias = Fecha2-Fecha1;

For i := 1 to NumDias do begin
*
*
*
*
FechaIni := FechaIni + 1;
end;

Mas o menos...
Responder Con Cita
  #6  
Antiguo 14-04-2005
davidgaldo davidgaldo is offline
Miembro
 
Registrado: nov 2003
Posts: 220
Poder: 21
davidgaldo Va por buen camino
gracias a todos por vuestra ayuda , voy a probarlo
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 22:56: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
Copyright 1996-2007 Club Delphi