IsValidShortDOW Function
Returns True if DOW can be found in the Short Day Names from the Regional Settings.

Unit
QESBPCSDateTime

Declaration
Function IsValidShortDOW(const DOW: string): Boolean;

Parameters
DOW String containing Day of Week Name

Category
Date/Time Comparison

Implementation

function IsValidShortDOW (const DOW: string): Boolean;
var
     S: string;
     I: Integer;
begin
     Result := False;
     S := AnsiUpperCase (DOW);
     for I := 1 to 12 do
          if S = AnsiUpperCase (ShortDayNames [I]) then
          begin
               Result := True;
               Break
          end;
End;


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