StrToDate ()

Функція StrToDate (const S: string): TDateTime;
Опис

Функція перетворює строкове значення дати в значення типу TDateTime. Вхідна рядок повинен складатися з двох або трьох чисел, відокремлених символами-роздільниками.Символ, що використовується в якості роздільника, визначається значенням глобальної змінної DateSeparator. Порядок дня місяця і року визначається глобальною змінною ShortDateFormat. Можливі наступні комбінації: місяць / день / рік, день / місяць / рік і рік / місяць / день. Якщо рядок містить лише два числа, то вони сприймаються, як день і місяць (місяць / день або день / місяць) поточного року. Якщо в значенні року використовує тільки два символи, то століття (XX або XXI), до якого буде віднесений даний рік, буде визначатися значенням глобальної змінної TwoDigitYearCenturyWindow. Якщо значення даної змінної дорівнює 0, то всі значення року (0 .. 99) будуть віднесені до XX ст. Якщо значення TwoDigitYearCenturyWindow> 0, то обчислюється "базовий" рік ("базовий рік": = "поточний рік"-TwoDigitYearCenturyWindow), і всі роки, починаючи з "базового" будуть ставитися до XX століття, а всі роки менше "базового", до XXI століття. Якщо рядок містить неприпустиме значення дати, то виникає виняток EConvertError. Змінюючи значення змінної TwoDigitYearCenturyWindow. можна збільшити термін працездатності додатків, в яких для значення року можливо використовувати тільки дві цифри. Найбільш вдалим рішенням є використання чотирирозрядного запису років.

Приклад
var
D: TDateTime;
S: string;
begin
D: = StrToDate ('04 .10.1999 ');
S: = FormatDateTime ('d mmm yy р.', D); {S: = '4 жовтня 1999 '}
MessageDlg (S, mtInformation, [mbOk], 0);
end;