Существует ли функция, определяющая колич дней в месяце?

Саак Шахламджян User Сообщений: 578 Регистрация: 17.03.2008 г.Волгоград, ООО "ЦМИ", Б-5 3.4,SP12	#1 11.11.2008 13:50:43 Нужна функция, опеределяющая количество дней в месяце. Есть ли такая? Дайте, пожалуйста, если есть.

User

Сообщений: 578 Регистрация: 17.03.2008

г.Волгоград, ООО "ЦМИ", Б-5 3.4,SP12

11.11.2008 14:51:12

написать было не очень сложно:

Код
STATIC Function DaysInMonth(dDate) Local dCurDate:=Stod(Left(DtoS(dDate),6)+"20")+15 dDate:=Stod(Left(DtoS(dDate),6)+"01") dCurDate:=Stod(Left(DtoS(dCurDate),6)+"01") return dCurDate-dDate

Догадаться что количество дней в месяце - это разность между первыми числами соседних месяцев было сложнее:)

Изменено: Саак Шахламджян - 11.11.2008 15:12:17

User

Сообщений: 872 Регистрация: 11.10.2007

Пермь

11.11.2008 15:18:33

Цитата
LastDayoM() : Returns the number of days in a month. Syntax LastDayoM( <dDate>\|<nMonth> ) --> nDaysInMonth Arguments <dDate> Any Date value, except for an empty date, can be passed. The default is the return value of Date() . <nMonth> Alternatively, the numeric month between 1 and 12 can be passed. Return value The function returns the number of days of the specified month as a numeric value.

Функция есть в pll.bdll и в ct.bdll
Насколько доступна не знаю.

Изменено: Алексей Новиков - 11.11.2008 15:19:15

С уважением, Новиков Алексей.

Форум