Cita:
Empezado por ecfisa
Hola francodelphi.
Para consultar si está ocupada sólo es necesario evaluar la fecha hasta.
Un ejemplo:
Código Delphi [-]
uses DateUtils;
...
var
OcupadaHasta: TDateTime;
FechaAConsultar: TDateTime;
begin
OcupadaHasta:= StrToDateTime('05/01/2011'); // fecha hasta
FechaAConsultar:= StrToDateTime('04/1/2011'); // fecha a consultar
if CompareDate(OcupadaHasta, FechaAConsultar) = 1 then
Caption:= 'OCUPADA' // <- Resultado en este ejemplo
else
Caption:= 'LIBRE';
...
A fines del ejemplo asigné los valores a mano, pero lógicamente el valor de OcupadaHasta deberá ser obtenido de alguna tabla.
Podés ampliar la funcionalidad añadiendo a la fecha la hora (generalmente se desocupan a las diez de la mañana)
Saludos. |
siempre eres acertado en tus intervenciones ecfisa... pero no creo que sea tan sencillo,
lo que le planteas, no te da una fecha exacta de cuando este libre la cabaña