| IsValidLongDOW Function |
Unit
QESBPCSDateTime
Declaration
Function IsValidLongDOW(const DOW: string): Boolean;
| Parameters |
| DOW | String containing Day of Week Name |
Category
Date/Time ComparisonImplementation
function IsValidLongDOW (const DOW: string): Boolean;
var
S: string;
I: Integer;
begin
Result := False;
S := AnsiUpperCase (DOW);
for I := 1 to 12 do
if S = AnsiUpperCase (LongDayNames [I]) then
begin
Result := True;
Break
end;
End; |
|
|