Функция SetLocaleInfo

Locale

Идентификатор локального контекста

LCType

Тип изменяемого параметра. Может принимать следующие значения

LOCALE_ICALENDARTYPE LOCALE_ICURRDIGITS LOCALE_ICURRENCY LOCALE_IDIGITS LOCALE_IFIRSTDAYOFWEEK LOCALE_IFIRSTWEEKOFYEAR LOCALE_ILZERO LOCALE_IMEASURE LOCALE_INEGCURR LOCALE_INEGNUMBER LOCALE_IPAPERSIZE LOCALE_ITIME LOCALE_S1159 LOCALE_S2359 LOCALE_SCURRENCY

LOCALE_SDATE LOCALE_SDECIMAL LOCALE_SGROUPING LOCALE_SLIST LOCALE_SLONGDATE LOCALE_SMONDECIMALSEP LOCALE_SMONGROUPING LOCALE_SMONTHOUSANDSEP LOCALE_SNEGATIVESIGN LOCALE_SPOSITIVESIGN LOCALE_SSHORTDATE LOCALE_STHOUSAND LOCALE_STIME LOCALE_STIMEFORMAT LOCALE_SYEARMONTH

lpLCData

Новое значение изменяемого параметра

Пример

' Меняем формат даты для компьютера
Dim dwLCID As Long

dwLCID = GetSystemDefaultLCID()
If SetLocaleInfo(dwLCID, LOCALE_SSHORTDATE, "dd-MMM-yy") _
            = False Then
   MsgBox "Ошибка"
   Exit Sub
End If

PostMessage HWND_BROADCAST, WM_SETTINGCHANGE, 0, 0
' Теперь откройте апплет Панели управления Язык и стандарты
' и перейдите на вкладку Даты, чтобы увидеть изменения

Смотри также

Категория