IsFriday Function
Returns True if the Date represents a Friday.

Unit
QESBPCSDateTime

Declaration
Function IsFriday(const DT: TDateTime): Boolean;

Parameters
DT Date to process.

Category
Date/Time Comparison

Implementation

function IsFriday (const DT: TDateTime): Boolean;
begin
     Result := DayOfWeek (DT) = 6;
End;


HTML generated by Time2HELP
http://www.time2help.com