Модуль: SysUtils

Описание
Функция преобразовывает значения года, месяца и дня, переданные в параметрах Year, Month и Day, соответственно, в значение типа TDateTime. Исходные значения должны иметь допустимые величины: для Year - 1.. 9999; для Month - 1.. 12; для Day - от 1 до 28, 29, 30, или 31, в зависимости от значения Month. Например, если Month=2 (февраль), то значение Day должно лежать в пределах 1.. 28 или 1.. 29, в зависимости от того, представляет значение Year високосный год или не високосный. Если значения выходят за границы допустимых диапазонов, то возникает исключение EConvertError.

Пример
var
   D: TDateTime;
begin
   D:= EncodeDate( 1999, 2, 23);
   MessageDlg( DateToStr(D), mtInformation, [mbOk], 0);
end;