Ver Mensaje Individual
  #7  
Antiguo 26-10-2005
Avatar de vtdeleon
vtdeleon vtdeleon is offline
Miembro
 
Registrado: abr 2004
Ubicación: RD & USA
Posts: 3.236
Reputación: 23
vtdeleon Va por buen camino
Saludos
Cita:
Empezado por zugazua2001
mi problema es que no tengo esa unidad.
Oops.
Cita:
Empezado por zugazua2001
De donde la puedo bajar¿?
Ni la menor idea pero puede hacer esto: Feo, pero es lo que se me ocurre ahora
Código Delphi [-]
var
  fecha,tfecha:TDate;
  dia,mes,ano:word;
begin
  fecha:=now;//Aquí asignas la fecha del mes
  DecodeDate(fecha,ano,mes,dia);
  inc(mes);
  tfecha:=EncodeDate(ano,mes,dia);
  showmessage(copy(DateToStr(tfecha+2-fecha),1,2));
Si alguien puede mejorarlo, agradecido estaré
__________________
Van Troi De León
(Not) Guía, Code vB:=Delphi-SQL, ¿Cómo?
Viajar en el tiempo no es teóricamente posible, pues si lo fuera, ya estarían aqui contándonos al respecto!
Responder Con Cita