Сабж.

В 7-ке вроде бы отвутствует, за полной ненадобностью.

В 6-ке тоже отсутствует, причем по той же самой причине. И пишется за минуту. Даже меньше. Смотря как быстро печатаешь :)

> по той же самой причине


Я даже подозреваю по какой)

> easy ©   (28.03.08 15:40) [4]


Папуасы не оценят)

easy ©   (28.03.08 15:40) [4]

Несолидно.

MonthOf(Foo) div 4 + 1;

KvartalN
Ну…почему не
Quarter

?

> Сергей М. ©   (28.03.08 15:42) [5]

точно.
я-то спрашивал про что-нть такое: GetNumberQuarter(Now).
но все равно спс

Что бы "папуасам" (С) было понятно что делает эта функция :))

> Kolan © (28.03.08 15:47) [7]

не про квартиры же спрашивали..

> Игорь Шевченко © (28.03.08 15:46) [6]

оно какую-то ошику пишет и не компилиться

> asdf2 (28.03.08 15:47) [8]

ну вот, муму Тургенев написал, а памятник - Пушкину.. :`(

> Palladin ©   (28.03.08 15:48) [9]


)

Я к тому, что у папуасов понятие "квартал" вполне может отсутствовать как напрочь, так и в традиционно приемлемом им виде)..

Борланд же обязан  был чтить "квартальные" чувства как нши, "европеистые", так и  любые "нетрадиционные", те же папуасообразные)

> easy ©   (28.03.08 15:54) [10]

да нет, спс тебе адресовано было

easy ©   (28.03.08 15:54) [10]


> оно какую-то ошику пишет и не компилиться


Больно слышать

Все правильно :) этот код несовместим с 5-кой. :) нужно изобретать MonthOf :)

Palladin ©   (28.03.08 16:12) [15]


> Все правильно :) этот код несовместим с 5-кой. :)


Проблемы индейцев шерифа не волнуют :)

Слово есть, квартальные отчеты есть, а
> понятие "квартал" вполне может отсутствовать как напрочь,
>  так и в традиционно приемлемом им виде


парадокс?

> asdf2   (28.03.08 16:45) [17]


Кто ж знает, для кого ты сотворяешь свою "прогу")
Мож и для папуасов, у которых, вполне возможно, косой десяток "кварталов")

> Result:=Result div 4+1;

7 div 4 + 1 = 2!!!