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