Названия месецов по русски

Mihail3
Дата: 14.12.2012 07:28:55
Здравствуйте. У меня такой вопрос. В отчете есть поле месяц, и он туда ставиться командой CMONTH(DATE()), но название месяца отображается по английски, как сделать так что бы оно было русским? Помню как то давно месяца 3-4 назад я это уже делал, но как я совершено не помню.
Березовский
Дата: 14.12.2012 07:56:12
Поставить русский рантайм. Или использовать самописную функцию
перевода nMonth в cMonth
Mihail3
Дата: 14.12.2012 08:16:16
Березовский
Поставить русский рантайм.
А как можно поподробнее, как мне помниться я это делал без подключения чего либо.
tanglir
Дата: 14.12.2012 08:37:03
Mihail3, vfp9rrus.dll кинуть в папку с программой.
Mihail3
Дата: 14.12.2012 08:44:08
tanglir, Спасибо, а другого способа нет?, я как то по другому делал просто. Но в любом случае спасибо за помощь)
Jonny540
Дата: 14.12.2012 08:49:14
Mihail3
tanglir, Спасибо, а другого способа нет?, я как то по другому делал просто. Но в любом случае спасибо за помощь)
Ну держи UDF :)
FUNCTION P_Month
LPARAMETERS nM
PRIVATE mMn
DIMENSION mMn(12)
mMn(1)='Январь'
mMn(2)='Февраль'
mMn(3)='Март'
...
mMn(12)='Декабрь'
RETURN mMn(nM)
ENDFUNC
Mihail3
Дата: 14.12.2012 08:50:56
Jonny540, Спасиб)
Dima T
Дата: 14.12.2012 16:33:31
Jonny540
Mihail3
tanglir, Спасибо, а другого способа нет?, я как то по другому делал просто. Но в любом случае спасибо за помощь)
Ну держи UDF :)
FUNCTION P_Month
LPARAMETERS nM
PRIVATE mMn
DIMENSION mMn(12)
mMn(1)='Январь'
mMn(2)='Февраль'
mMn(3)='Март'
...
mMn(12)='Декабрь'
RETURN mMn(nM)
ENDFUNC

Я бы еще добавил чтоб ошибок не возникало:
return iif(between(nM, 1, 12), mMn(nM), 'МАРТОБРЬ')
Jonny540
Дата: 14.12.2012 16:46:05
Dima T
Jonny540
пропущено...
Ну держи UDF :)
FUNCTION P_Month
LPARAMETERS nM
PRIVATE mMn
DIMENSION mMn(12)
mMn(1)='Январь'
mMn(2)='Февраль'
mMn(3)='Март'
...
mMn(12)='Декабрь'
RETURN mMn(nM)
ENDFUNC

Я бы еще добавил чтоб ошибок не возникало:
return iif(between(nM, 1, 12), mMn(nM), 'МАРТОБРЬ')
Ну уж если совсем по большому счету, то и
if type('nM')#'N'
  return 'С Новым Годом! Пошел на фиг!'
endif
BMJ
Дата: 14.12.2012 18:50:12
Мартобря это то что надо, особенно при склонении.... или спряжении....вобщем не в пятницу вопрос.. вот опохмелимся....