Determine whether a time is PM or AM.
Source position: dateutil.inc line 104
| function IsPM( | 
| const AValue: TDateTime | 
| ):Boolean; | 
| AValue | 
 | Time to check. | 
True if the time part of AValue is PM (afternoon).
IsPM returns True if the time part of AValue is later then 12:00 (PM, or afternoon).
| 
 | Extract the year from a given date. | |
| 
 | Determine whether a date is in a leap year. | |
| 
 | Check whether a given date is today. | |
| 
 | Check if two date/time indications are the same day. | 
Program Example4; { This program demonstrates the IsPM function } Uses SysUtils,DateUtils; Begin Writeln('Current time is PM : ',IsPM(Now)); End.