TGregorianDate.FMonth

Source

DateTime.Calendar.Gregorian.Date.pas (53)