| IsApril Function |
Unit
QESBPCSDateTime
Declaration
Function IsApril(const DT: TDateTime): Boolean;
| Parameters |
| DT | Date to process. |
Category
Date/Time ComparisonImplementation
function IsApril (const DT: TDateTime): Boolean;
begin
Result := Date2Month (DT) = 4;
End; |
|
|