2 * PROJECT: ReactOS International Control Panel
3 * LICENSE: GPL - See COPYING in the top level directory
4 * FILE: lib/cpl/intl/extra.c
5 * PURPOSE: Extra parameters page
6 * PROGRAMMERS: Alexey Zavyalov (gen_x@mail.ru)
9 /* INCLUDES *****************************************************************/
18 /* GLOBALS ******************************************************************/
22 /* FUNCTIONS ****************************************************************/
24 /* Language enumerate procedure */
27 LanguagesEnumProc(LPTSTR lpLanguage
)
30 TCHAR Lang
[MAX_STR_SIZE
];
33 Lcid
= wcstoul(lpLanguage
, NULL
, 16);
35 GetLocaleInfo(Lcid
, LOCALE_SLANGUAGE
, Lang
, sizeof(Lang
));
36 Index
= (int) SendMessageW(hLanguageList
,
41 SendMessageW(hLanguageList
,
49 /* Enumerate all installed language identifiers */
52 CreateLanguagesList(HWND hWnd
)
54 TCHAR LangSel
[MAX_STR_SIZE
];
58 EnumSystemLocalesW(LanguagesEnumProc
, LCID_INSTALLED
);
60 // Select current locale
61 GetLocaleInfo(GetUserDefaultLCID(),
66 SendMessageW(hLanguageList
,
73 /* Extra Parameters page dialog callback */
76 ExtraOptsProc(HWND hwndDlg
, UINT uMsg
, WPARAM wParam
, LPARAM lParam
)
78 UNREFERENCED_PARAMETER(wParam
);
82 CreateLanguagesList(GetDlgItem(hwndDlg
, IDC_LANGUAGE_COMBO
));
91 LPNMHDR Lpnm
= (LPNMHDR
)lParam
;
92 /* If push apply button */
93 if (Lpnm
->code
== (UINT
)PSN_APPLY
)