Month: Integer;
Свойство Month возвращает номер месяца из текущей переменной.
Sub UserProc;
Var
i: Integer;
DT: DateTime;
Begin
DT := DateTime.Parse("30.03.2002 00:00:00");
DT := DateTime.AddMonths(DT, 3);
i := DT.Month;
End Sub UserProc;
После выполнения примера в переменной «i» будет содержаться значение 6.
См. также: