Thank you for your code. It is a huge amount of code for a simple
conversion, but I think that it will work.
Yes. You should use EnumSystemLocales and in the callback procedure do
GetLocaleInfo(...) with LOCALE_SABBREVLANGNAME option to get all
available abbreviations until you 'll get the desired one.
Note, however, that this EnumSystemLocales API was very poor designed (it
doesn't have any User defined parameter to pass in) so you will,
probably, need to use some global/static variables...
I did it something like:
class CMyLocaleInfo
{
public:
CString GetAbbreviationFromLocaleID(DWORD localeID);
....
CMyLocaleInfo();
virtual ~CMyLocaleInfo();
private:
static BOOL CALLBACK EnumLocalesProcAbbr(LPTSTR lpLocaleString);
static CString s_strAbbrev;
static DWORD s_localeID;
};
.......
DWORD CMyLocaleInfo::s_localeID = 0;
CString CMyLocaleInfo::s_strAbbrev = _T("");
CString CMyLocaleInfo::GetAbbreviationFromLocaleID(DWORD localeID)
{
CString strAbbrev;
int nChar = GetLocaleInfo(localeID, LOCALE_SABBREVLANGNAME, NULL, 0);
if(nChar)
{
nChar = GetLocaleInfo(localeID, LOCALE_SABBREVLANGNAME,
strAbbrev.GetBuffer(nChar), nChar);
strAbbrev.ReleaseBuffer();
}
if(nChar == 0)
{
// error
CString strErr;
DWORD dwErr = ::GetLastError();
switch (dwErr)
{
case ERROR_INSUFFICIENT_BUFFER:
strErr.Format(_T("Buffer = %ul"), nChar);
break;
case ERROR_INVALID_FLAGS :
strErr.Format(_T("Flags = %ul"), LOCALE_SABBREVLANGNAME);
break;
case ERROR_INVALID_PARAMETER :
strErr.Format(_T("Locale_ID = %ul"), localeID);
break;
default:
ASSERT(0);
}
LPVOID lpMsgBuf;
FormatMessage(
FORMAT_MESSAGE_ALLOCATE_BUFFER |
FORMAT_MESSAGE_FROM_SYSTEM |
FORMAT_MESSAGE_IGNORE_INSERTS,
NULL,
dwErr,
MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), // Default language
(LPTSTR) &lpMsgBuf,
0,
NULL );
CString strMess = (LPTSTR) lpMsgBuf;
// Free the buffer.
LocalFree( lpMsgBuf );
// add message with dll name:
strMess += _T("\r\n\'GetLocaleInfo\':\r\n") + strErr;
AfxMessageBox( strMess, MB_OK | MB_ICONEXCLAMATION );
}
return strAbbrev;
}
BOOL CALLBACK CMyLocaleInfo::EnumLocalesProcAbbr(LPTSTR lpLocaleString)
{
LPTSTR lp;
// get language abbreviation
CString strAbbr;
DWORD locID = _tcstoul(lpLocaleString, &lp, 16);
int nChar = GetLocaleInfo(locID, LOCALE_SABBREVLANGNAME, NULL, 0);
if(nChar)
{
nChar = GetLocaleInfo(locID, LOCALE_SABBREVLANGNAME,
strAbbr.GetBuffer(nChar), nChar);
strAbbr.ReleaseBuffer();
}
if(nChar == 0)
{
// error
CString strErr;
DWORD dwErr = ::GetLastError();
switch (dwErr)
{
case ERROR_INSUFFICIENT_BUFFER:
strErr.Format(_T("Buffer = %ul"), nChar);
break;
case ERROR_INVALID_FLAGS :
strErr.Format(_T("Flags = %ul"), LOCALE_SABBREVLANGNAME);
break;
case ERROR_INVALID_PARAMETER :
strErr.Format(_T("Locale_ID = %ul"), locID);
break;
default:
ASSERT(0);
}
LPVOID lpMsgBuf;
FormatMessage(
FORMAT_MESSAGE_ALLOCATE_BUFFER |
FORMAT_MESSAGE_FROM_SYSTEM |
FORMAT_MESSAGE_IGNORE_INSERTS,
NULL,
dwErr,
MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), // Default language
(LPTSTR) &lpMsgBuf,
0,
NULL );
CString strMess = (LPTSTR) lpMsgBuf;
// Free the buffer.
LocalFree( lpMsgBuf );
// add message with dll name:
strMess += _T("\r\n\'GetLocaleInfo\':\r\n") + strErr;
AfxMessageBox( strMess, MB_OK | MB_ICONEXCLAMATION );
}
if(strAbbr.CompareNoCase(s_strAbbrev) == 0)
{
s_localeID = locID;
return FALSE;
}
else
return TRUE;
}
Victor
"Michael Reim"
<nospammichaelDOTreim@REMOVENOSPAMANDCAPShelmut-fischer.denospam> wrote
in message news:%23vvRg6uIJHA.4600@TK2MSFTNGP06.phx.gbl...
Hello Experts
Is there a function that converts the three-letter language-strings to
the lcid that one needs for SetThreadLocale?
e.g.
"deu" should be converted to the result of
MAKELCID(MAKELANGID(LANG_GERMAN,SUBLANG_GERMAN),SORT_DEFAULT)
"chs" should be converted to the result of
MAKELCID(MAKELANGID(LANG_CHINESE,SUBLANG_CHINESE_SIMPLIFIED),SORT_DEFAULT)
TIA
--
Michael Reim
Michael DOT Reim AT helmut-fischer DOT de