Returns True if they are both the same Time ignoring the Date portion.Unit
QESBPCSDateTime
Declaration
Function SameTime(const DT1, DT2: TDateTime): Boolean;
Description
Times are considered the same if they are less then 1 millisecond apart.
| DT1 | First Time to process. | 
| DT2 | Second Time to process. | 
Category
Date/Time Comparison
Implementation
 
  | function SameTime (const DT1, DT2: TDateTime): Boolean;
begin
     Result := abs (Frac (DT1) - Frac (DT2)) < OneDTMillisecond;
End; | 
| HTML generated by Time2HELP | 
http://www.time2help.com