IsValidDateTime

IsValidDateTime is a combination of 2 individual functions, and returns True if the given date and time parts would return a valid date and time.

This function is useful for testing the date and time parts prior to passing them to the EncodeDateTime function.

Declaration: function IsValidDateTime(const AYear: Word; const AMonth: Word; const ADay: Word; const AHour: Word; const AMinute: Word; const ASecond: Word; const AMilliSecond: Word): Boolean;

An example of its use follows.

procedure OnMapEvent(var Value:Variant);
var
  vReal, vReal2 ; boolean;
begin
  //Returns true if the given date parts would create a valid date
  
  vReal := IsValidDateTime(2009, 06, 25, 15, 45, 23, 562);         //VALID       
  if vReal = True then
    loginfo('vReal date/time parts are valid.')
  else
    LogInfo('vReal date/time has an invalid component.');
    
  vReal2 := IsValidDateTime(2024, 02, 30, 15, 45, 23, 562);        //INVALID
  if vReal2 = True then
    loginfo('vReal2 date/time parts are valid.')
  else
    LogInfo('vReal2 date/time has an invalid component.');
    
  LogInfo('');
end;