IsWeekdayNow Function
Returns True if today is Monday through Friday.

Unit
QESBPCSDateTime

Declaration
Function IsWeekdayNow: Boolean;

Category
Date/Time Comparison

Implementation

function IsWeekdayNow: Boolean;
begin
     Result := DayOfWeek (Date) in [2..6];
End;


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