Hora entre horas

[Casimiro Noteví]

Una hora o una fecha-hora es un valor numérico, así que es tan simple como has escrito. La parte entera es la fecha y los decimales es la hora ( ejemplo: 5245112212.3646745)
No sé si preguntas por hacerlo en delphi o para una base de datos, pero tienes muchas formas de hacerlo, dependiendo de lo que exactamente estés buscando.

Código Delphi [-]
if (fechahora>=fechahorainicio) and (fechahora<=fechafinal) then
begin
  hazloquesea;
  ...
end;

[[AgustinOrtu]]

Revisa la unidad DateUtils

Código Delphi [-]
{ InRange functions }

function DateTimeInRange(ADateTime: TDateTime; AStartDateTime, AEndDateTime: TDateTime; aInclusive: Boolean = True): Boolean;
function DateInRange(ADate: TDate; AStartDate, AEndDate: TDate; AInclusive: Boolean = True): Boolean;
function TimeInRange(ATime: TTime; AStartTime, AEndTime: TTime; AInclusive: Boolean = True): Boolean;

[roman]

Creo que no todas las versiones de Delphi traen esas funciones (no la veo en Delphi 7, al menos). En todo caso, siguiendo los pasos de maese Casimiro, podríamos usar esta versión simplificada:

Código Delphi [-]
function TimeInRange(ATime: TTime; AStartTime, AEndTime: TTime): Boolean;
begin
  Result := (Frac(AStartTime) <= Frac(ATime)) and (Frac(ATime) <= Frac(AEndTime));
end;

LineComment Saludos