| IsAM Function |
Unit
QESBPCSDateTime
Declaration
Function IsAM(const DT: TDateTime): Boolean;
| Parameters |
| DT | Time to process. |
Category
Date/Time ComparisonImplementation
function IsAM (const DT: TDateTime): Boolean;
begin
Result := Frac (DT) < 0.5
End; |
|
|