Jednodussi cesta je pouziti funkce:
RecodeMilliSecond(const AValue: TDateTime; const AMilliSecond: Word)
Pomoci ni vynulujes ms v aktualnim case a muzes porovnavat.

begin
   time1 := RecodeMilliSecond(Time, 0);
   time2 := StrToTime('10:16:00');
   Label1.Caption:= TimeToStr(time1);
   Label2.Caption:= TimeToStr(time2);
   If time1 => time2 Then  ShowMessage('shoda');
end;