IsValidShortDOW Function |
Unit
QESBPCSDateTime
Declaration
Function IsValidShortDOW(const DOW: string): Boolean;
Parameters |
DOW | String containing Day of Week Name |
Category
Date/Time ComparisonImplementation
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; |
|