Условие для DateTimePicker

[Snail]

Пишу прогаммку для учета рабочего времени (Delphi + Access)
Имеется следующий распорядок дня:
Первая смена 8.00 - 17.00
Вторая смена 16.30 - 23.00
Обед 12.00 - 12.48
Если сотрудник приходит раньше, то отмечается, как пришедший вовремя, если позже - по факту + заносится в таблицу нарушений.
Для наглядности:
if Time < 8.00 then Time := 8.00
If Time < 16.30 then time := 16.30
но при этом
if Time > 8.00 then Нарушение
If Time > 16.30 then Нарушение
Загвоздка в правильной формулировке условия, - ведь сотрудник может придти за полчаса/час до своей смены (т.е. если сотрудник придет в 15.30 то он будет считаться нарушителем, т.к. 15.30 явно больше 8.00)
Может кто какую идейку подкинет?