/*++ Copyright (c) 1994-2000, Microsoft Corporation All rights reserved. Module Name: curdlg.c Abstract: This module implements the currency property sheet for the Regional Options applet. Revision History: --*/ // // Include Files. // #include "intl.h" #include #include #include "intlhlp.h" #include "maxvals.h" // // Global Variables. // static TCHAR sz_iCurrDigits[MAX_ICURRDIGITS+1]; static TCHAR sz_iCurrency[MAX_ICURRENCY+1]; static TCHAR sz_iNegCurr[MAX_INEGCURR+1]; static TCHAR sz_sCurrency[MAX_SCURRENCY+1]; static TCHAR sz_sMonDecimalSep[MAX_SMONDECSEP+1]; static TCHAR sz_sMonGrouping[MAX_SMONGROUPING+1]; static TCHAR sz_sMonThousandSep[MAX_SMONTHOUSEP+1]; // // Context Help Ids. // static int aCurrencyHelpIds[] = { IDC_SAMPLELBL1, IDH_INTL_CURR_POSVALUE, IDC_SAMPLE1, IDH_INTL_CURR_POSVALUE, IDC_SAMPLELBL2, IDH_INTL_CURR_NEGVALUE, IDC_SAMPLE2, IDH_INTL_CURR_NEGVALUE, IDC_SAMPLELBL3, IDH_COMM_GROUPBOX, IDC_POS_CURRENCY_SYM, IDH_INTL_CURR_POSOFSYMBOL, IDC_CURRENCY_SYMBOL, IDH_INTL_CURR_SYMBOL, IDC_NEG_NUM_FORMAT, IDH_INTL_CURR_NEGNUMFMT, IDC_DECIMAL_SYMBOL, IDH_INTL_CURR_DECSYMBOL, IDC_NUM_DECIMAL_DIGITS, IDH_INTL_CURR_DIGITSAFTRDEC, IDC_DIGIT_GROUP_SYMBOL, IDH_INTL_CURR_DIGITGRPSYMBOL, IDC_NUM_DIGITS_GROUP, IDH_INTL_CURR_DIGITSINGRP, 0, 0 }; //////////////////////////////////////////////////////////////////////////// // // Currency_DisplaySample // // Updates the currency sample. It formats the currency based on the // user's current locale settings. It displays either a positive value // or a negative value based on the Positive/Negative radio buttons. // //////////////////////////////////////////////////////////////////////////// void Currency_DisplaySample( HWND hDlg) { TCHAR szBuf[MAX_SAMPLE_SIZE]; int nCharCount; // // Get the string representing the currency format for the positive sample // currency and, if the the value is valid, display it. Perform the same // operations for the negative currency sample. // nCharCount = GetCurrencyFormat( UserLocaleID, 0, szSample_Number, NULL, szBuf, MAX_SAMPLE_SIZE ); if (nCharCount) { SetDlgItemText(hDlg, IDC_SAMPLE1, szBuf); } else { MessageBox(hDlg, szLocaleGetError, NULL, MB_OK | MB_ICONINFORMATION); } nCharCount = GetCurrencyFormat( UserLocaleID, 0, szNegSample_Number, NULL, szBuf, MAX_SAMPLE_SIZE ); if (nCharCount) { SetDlgItemText(hDlg, IDC_SAMPLE2, szBuf); } else { MessageBox(hDlg, szLocaleGetError, NULL, MB_OK | MB_ICONINFORMATION); } } //////////////////////////////////////////////////////////////////////////// // // Currency_SaveValues // // Save values in the case that we need to restore them. // //////////////////////////////////////////////////////////////////////////// void Currency_SaveValues() { // // Save values. // if (!GetLocaleInfo( UserLocaleID, LOCALE_ICURRDIGITS, sz_iCurrDigits, MAX_ICURRDIGITS + 1 )) { _tcscpy(sz_iCurrDigits, TEXT("2")); } if (!GetLocaleInfo( UserLocaleID, LOCALE_ICURRENCY, sz_iCurrency, MAX_ICURRENCY + 1 )) { _tcscpy(sz_iCurrency, TEXT("0")); } if (!GetLocaleInfo( UserLocaleID, LOCALE_INEGCURR, sz_iNegCurr, MAX_INEGCURR + 1 )) { _tcscpy(sz_iNegCurr, TEXT("0")); } if (!GetLocaleInfo( UserLocaleID, LOCALE_SCURRENCY, sz_sCurrency, MAX_SCURRENCY + 1 )) { _tcscpy(sz_sCurrency, TEXT("$")); } if (!GetLocaleInfo( UserLocaleID, LOCALE_SMONDECIMALSEP, sz_sMonDecimalSep, MAX_SMONDECSEP + 1 )) { _tcscpy(sz_sMonDecimalSep, TEXT(".")); } if (!GetLocaleInfo( UserLocaleID, LOCALE_SMONGROUPING, sz_sMonGrouping, MAX_SMONGROUPING + 1 )) { _tcscpy(sz_sMonGrouping, TEXT("3;0")); } if (!GetLocaleInfo( UserLocaleID, LOCALE_SMONTHOUSANDSEP, sz_sMonThousandSep, MAX_SMONTHOUSEP + 1 )) { _tcscpy(sz_sMonThousandSep, TEXT(",")); } } //////////////////////////////////////////////////////////////////////////// // // Currency_RestoreValues // //////////////////////////////////////////////////////////////////////////// void Currency_RestoreValues() { if (g_dwCustChange & Process_Curr) { SetLocaleInfo(UserLocaleID, LOCALE_ICURRDIGITS, sz_iCurrDigits); SetLocaleInfo(UserLocaleID, LOCALE_ICURRENCY, sz_iCurrency); SetLocaleInfo(UserLocaleID, LOCALE_INEGCURR, sz_iNegCurr); SetLocaleInfo(UserLocaleID, LOCALE_SCURRENCY, sz_sCurrency); SetLocaleInfo(UserLocaleID, LOCALE_SMONDECIMALSEP, sz_sMonDecimalSep); SetLocaleInfo(UserLocaleID, LOCALE_SMONGROUPING, sz_sMonGrouping); SetLocaleInfo(UserLocaleID, LOCALE_SMONTHOUSANDSEP, sz_sMonThousandSep); } } //////////////////////////////////////////////////////////////////////////// // // Currency_ClearValues // // Reset each of the list boxes in the currency property sheet page. // //////////////////////////////////////////////////////////////////////////// void Currency_ClearValues( HWND hDlg) { ComboBox_ResetContent(GetDlgItem(hDlg, IDC_CURRENCY_SYMBOL)); ComboBox_ResetContent(GetDlgItem(hDlg, IDC_POS_CURRENCY_SYM)); ComboBox_ResetContent(GetDlgItem(hDlg, IDC_NEG_NUM_FORMAT)); ComboBox_ResetContent(GetDlgItem(hDlg, IDC_DECIMAL_SYMBOL)); ComboBox_ResetContent(GetDlgItem(hDlg, IDC_NUM_DECIMAL_DIGITS)); ComboBox_ResetContent(GetDlgItem(hDlg, IDC_DIGIT_GROUP_SYMBOL)); ComboBox_ResetContent(GetDlgItem(hDlg, IDC_NUM_DIGITS_GROUP)); } //////////////////////////////////////////////////////////////////////////// // // Currency_SetValues // // Initialize all of the controls in the currency property sheet page. // //////////////////////////////////////////////////////////////////////////// void Currency_SetValues( HWND hDlg) { HWND hCtrl1, hCtrl2; TCHAR szBuf[SIZE_128]; int Index; const nMax_Array_Fill = (cInt_Str >= 10 ? 10 : cInt_Str); CURRENCYFMT cfmt; TCHAR szThousandSep[SIZE_128]; TCHAR szEmpty[] = TEXT(""); TCHAR szSample[] = TEXT("123456789"); // // Initialize the dropdown box for the current locale setting for: // Currency Symbol // Currency Decimal Symbol // Currency Grouping Symbol // DropDown_Use_Locale_Values(hDlg, LOCALE_SCURRENCY, IDC_CURRENCY_SYMBOL); DropDown_Use_Locale_Values(hDlg, LOCALE_SMONDECIMALSEP, IDC_DECIMAL_SYMBOL); DropDown_Use_Locale_Values(hDlg, LOCALE_SMONTHOUSANDSEP, IDC_DIGIT_GROUP_SYMBOL); // // Fill in the Number of Digits after Decimal Symbol drop down list // with the values of 0 through 10. Get the user locale value and // make it the current selection. If GetLocaleInfo fails, simply // select the first item in the list. // hCtrl1 = GetDlgItem(hDlg, IDC_NUM_DECIMAL_DIGITS); hCtrl2 = GetDlgItem(hDlg, IDC_NUM_DIGITS_GROUP); for (Index = 0; Index < nMax_Array_Fill; Index++) { ComboBox_InsertString(hCtrl1, -1, aInt_Str[Index]); } if (GetLocaleInfo(UserLocaleID, LOCALE_ICURRDIGITS, szBuf, SIZE_128)) { ComboBox_SelectString(hCtrl1, -1, szBuf); } else { ComboBox_SetCurSel(hCtrl1, 0); } // // Fill in the Number of Digits in "Thousands" Grouping's drop down // list with the appropriate options. Get the user locale value and // make it the current selection. If GetLocaleInfo fails, simply // select the first item in the list. // cfmt.NumDigits = 0; // no decimal in sample string cfmt.LeadingZero = 0; // no decimal in sample string cfmt.lpDecimalSep = szEmpty; // no decimal in sample string cfmt.NegativeOrder = 0; // not a negative value cfmt.PositiveOrder = 0; // prefix, no separation cfmt.lpCurrencySymbol = szEmpty; // no currency symbol cfmt.lpThousandSep = szThousandSep; GetLocaleInfo(UserLocaleID, LOCALE_SMONTHOUSANDSEP, szThousandSep, SIZE_128); cfmt.Grouping = 0; if (GetCurrencyFormat(UserLocaleID, 0, szSample, &cfmt, szBuf, SIZE_128)) { ComboBox_InsertString(hCtrl2, -1, szBuf); } cfmt.Grouping = 3; if (GetCurrencyFormat(UserLocaleID, 0, szSample, &cfmt, szBuf, SIZE_128)) { ComboBox_InsertString(hCtrl2, -1, szBuf); } cfmt.Grouping = 32; if (GetCurrencyFormat(UserLocaleID, 0, szSample, &cfmt, szBuf, SIZE_128)) { ComboBox_InsertString(hCtrl2, -1, szBuf); } if (GetLocaleInfo(UserLocaleID, LOCALE_SMONGROUPING, szBuf, SIZE_128) && (szBuf[0])) { // // Since only the values 0, 3;0, and 3;2;0 are allowed, simply // ignore the ";#"s for subsequent groupings. // Index = 0; if (szBuf[0] == TEXT('3')) { if ((szBuf[1] == CHAR_SEMICOLON) && (szBuf[2] == TEXT('2'))) { Index = 2; } else { Index = 1; } } else { // // We used to allow the user to set #;0, where # is a value from // 0 - 9. If it's 0, then fall through so that Index is 0. // if ((szBuf[0] > CHAR_ZERO) && (szBuf[0] <= CHAR_NINE) && ((szBuf[1] == 0) || (lstrcmp(szBuf + 1, TEXT(";0")) == 0))) { cfmt.Grouping = szBuf[0] - CHAR_ZERO; if (GetCurrencyFormat(UserLocaleID, 0, szSample, &cfmt, szBuf, SIZE_128)) { Index = ComboBox_InsertString(hCtrl2, -1, szBuf); if (Index >= 0) { ComboBox_SetItemData( hCtrl2, Index, (LPARAM)((DWORD)cfmt.Grouping) ); } else { Index = 0; } } } } ComboBox_SetCurSel(hCtrl2, Index); } else { ComboBox_SetCurSel(hCtrl2, 0); } // // Initialize and Lock function. If it succeeds, call enum function to // enumerate all possible values for the list box via a call to EnumProc. // EnumProc will call Set_List_Values for each of the string values it // receives. When the enumeration of values is complete, call // Set_List_Values to clear the dialog item specific data and to clear the // lock on the function. Perform this set of operations for: // Position of Currency Symbol and Negative Currency Format. // if (Set_List_Values(hDlg, IDC_POS_CURRENCY_SYM, 0)) { EnumPosCurrency(EnumProcEx, UserLocaleID, 0); Set_List_Values(0, IDC_POS_CURRENCY_SYM, 0); if (GetLocaleInfo(UserLocaleID, LOCALE_ICURRENCY, szBuf, SIZE_128)) { ComboBox_SetCurSel( GetDlgItem(hDlg, IDC_POS_CURRENCY_SYM), Intl_StrToLong(szBuf) ); } else { MessageBox(hDlg, szLocaleGetError, NULL, MB_OK | MB_ICONINFORMATION); } } if (Set_List_Values(hDlg, IDC_NEG_NUM_FORMAT, 0)) { EnumNegCurrency(EnumProcEx, UserLocaleID, 0); Set_List_Values(0, IDC_NEG_NUM_FORMAT, 0); if (GetLocaleInfo(UserLocaleID, LOCALE_INEGCURR, szBuf, SIZE_128)) { ComboBox_SetCurSel( GetDlgItem(hDlg, IDC_NEG_NUM_FORMAT), Intl_StrToLong(szBuf) ); } else { MessageBox(hDlg, szLocaleGetError, NULL, MB_OK | MB_ICONINFORMATION); } } // // Display the current sample that represents all of the locale settings. // Currency_DisplaySample(hDlg); } //////////////////////////////////////////////////////////////////////////// // // Currency_ApplySettings // // For every control that has changed (that affects the Locale settings), // call Set_Locale_Values to update the user locale information. Notify // the parent of changes and reset the change flag stored in the property // sheet page structure appropriately. Redisplay the currency sample // if bRedisplay is TRUE. // //////////////////////////////////////////////////////////////////////////// BOOL Currency_ApplySettings( HWND hDlg, BOOL bRedisplay) { LPPROPSHEETPAGE lpPropSheet = (LPPROPSHEETPAGE)(GetWindowLongPtr(hDlg, DWLP_USER)); LPARAM Changes = lpPropSheet->lParam; if (Changes & CC_SCurrency) { if (!Set_Locale_Values( hDlg, LOCALE_SCURRENCY, IDC_CURRENCY_SYMBOL, TEXT("sCurrency"), FALSE, 0, 0, NULL )) { return (FALSE); } } if (Changes & CC_CurrSymPos) { if (!Set_Locale_Values( hDlg, LOCALE_ICURRENCY, IDC_POS_CURRENCY_SYM, TEXT("iCurrency"), TRUE, 0, 0, NULL )) { return (FALSE); } } if (Changes & CC_NegCurrFmt) { if (!Set_Locale_Values( hDlg, LOCALE_INEGCURR, IDC_NEG_NUM_FORMAT, TEXT("iNegCurr"), TRUE, 0, 0, NULL )) { return (FALSE); } } if (Changes & CC_SMonDec) { if (!Set_Locale_Values( hDlg, LOCALE_SMONDECIMALSEP, IDC_DECIMAL_SYMBOL, 0, FALSE, 0, 0, NULL )) { return (FALSE); } } if (Changes & CC_ICurrDigits) { if (!Set_Locale_Values( hDlg, LOCALE_ICURRDIGITS, IDC_NUM_DECIMAL_DIGITS, TEXT("iCurrDigits"), TRUE, 0, 0, NULL )) { return (FALSE); } } if (Changes & CC_SMonThousand) { if (!Set_Locale_Values( hDlg, LOCALE_SMONTHOUSANDSEP, IDC_DIGIT_GROUP_SYMBOL, 0, FALSE, 0, 0, NULL )) { return (FALSE); } } if (Changes & CC_DMonGroup) { if (!Set_Locale_Values( hDlg, LOCALE_SMONGROUPING, IDC_NUM_DIGITS_GROUP, 0, TRUE, 0, TEXT(";0"), NULL )) { return (FALSE); } } PropSheet_UnChanged(GetParent(hDlg), hDlg); lpPropSheet->lParam = CC_EverChg; // // Display the current sample that represents all of the locale settings. // if (bRedisplay) { Currency_ClearValues(hDlg); Currency_SetValues(hDlg); } // // Changes made in the second level. // if (Changes) { g_dwCustChange |= Process_Curr; } // // Return success. // return (TRUE); } //////////////////////////////////////////////////////////////////////////// // // Currency_ValidatePPS // // Validate each of the combo boxes whose values are constrained. // If any of the input fails, notify the user and then return FALSE // to indicate validation failure. // //////////////////////////////////////////////////////////////////////////// BOOL Currency_ValidatePPS( HWND hDlg, LPARAM Changes) { // // If nothing has changed, return TRUE immediately. // if (Changes <= CC_EverChg) { return (TRUE); } // // If the currency symbol has changed, ensure that there are no digits // contained in the new symbol. // if ((Changes & CC_SCurrency) && Item_Has_Digits(hDlg, IDC_CURRENCY_SYMBOL, FALSE)) { No_Numerals_Error(hDlg, IDC_CURRENCY_SYMBOL, IDS_LOCALE_CURR_SYM); return (FALSE); } // // If the currency's decimal symbol has changed, ensure that there are // no digits contained in the new symbol. // if ((Changes & CC_SMonDec) && Item_Has_Digits(hDlg, IDC_DECIMAL_SYMBOL, FALSE)) { No_Numerals_Error(hDlg, IDC_DECIMAL_SYMBOL, IDS_LOCALE_CDECIMAL_SYM); return (FALSE); } // // If the currency's thousands grouping symbol has changed, ensure that // there are no digits contained in the new symbol. // if ((Changes & CC_SMonThousand) && Item_Has_Digits(hDlg, IDC_DIGIT_GROUP_SYMBOL, FALSE)) { No_Numerals_Error(hDlg, IDC_DIGIT_GROUP_SYMBOL, IDS_LOCALE_CGROUP_SYM); return (FALSE); } // // Return success. // return (TRUE); } //////////////////////////////////////////////////////////////////////////// // // Currency_InitPropSheet // // The extra long value for the property sheet page is used as a set of // state or change flags for each of the list boxes in the property sheet. // Initialize this value to 0. Call Currency_SetValues with the property // sheet handle to initialize all of the property sheet controls. Limit // the length of the text in some of the ComboBoxes. // //////////////////////////////////////////////////////////////////////////// void Currency_InitPropSheet( HWND hDlg, LPARAM lParam) { // // The lParam holds a pointer to the property sheet page, save it // for later reference. // SetWindowLongPtr(hDlg, DWLP_USER, lParam); Currency_SetValues(hDlg); ComboBox_LimitText(GetDlgItem(hDlg, IDC_CURRENCY_SYMBOL), MAX_SCURRENCY); ComboBox_LimitText(GetDlgItem(hDlg, IDC_DECIMAL_SYMBOL), MAX_SMONDECSEP); ComboBox_LimitText(GetDlgItem(hDlg, IDC_DIGIT_GROUP_SYMBOL), MAX_SMONTHOUSEP); } //////////////////////////////////////////////////////////////////////////// // // CurrencyDlgProc // //////////////////////////////////////////////////////////////////////////// INT_PTR CALLBACK CurrencyDlgProc( HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam) { NMHDR *lpnm; LPPROPSHEETPAGE lpPropSheet = (LPPROPSHEETPAGE)(GetWindowLongPtr(hDlg, DWLP_USER)); switch (message) { case ( WM_NOTIFY ) : { lpnm = (NMHDR *)lParam; switch (lpnm->code) { case ( PSN_SETACTIVE ) : { // // If there has been a change in the regional Locale // setting, clear all of the current info in the // property sheet, get the new values, and update the // appropriate registry values. // if (Verified_Regional_Chg & Process_Curr) { Verified_Regional_Chg &= ~Process_Curr; Currency_ClearValues(hDlg); Currency_SetValues(hDlg); lpPropSheet->lParam = 0; } break; } case ( PSN_KILLACTIVE ) : { // // Validate the entries on the property page. // SetWindowLongPtr( hDlg, DWLP_MSGRESULT, !Currency_ValidatePPS( hDlg, lpPropSheet->lParam) ); break; } case ( PSN_APPLY ) : { // // Apply the settings. // if (Currency_ApplySettings(hDlg, TRUE)) { SetWindowLongPtr(hDlg, DWLP_MSGRESULT, PSNRET_NOERROR); // // Zero out the CC_EverChg bit. // lpPropSheet->lParam = 0; } else { SetWindowLongPtr( hDlg, DWLP_MSGRESULT, PSNRET_INVALID_NOCHANGEPAGE ); } break; } default : { return (FALSE); } } break; } case ( WM_INITDIALOG ) : { Currency_InitPropSheet(hDlg, lParam); Currency_SaveValues(); break; } case ( WM_DESTROY ) : { break; } case ( WM_HELP ) : { WinHelp( (HWND)((LPHELPINFO)lParam)->hItemHandle, szHelpFile, HELP_WM_HELP, (DWORD_PTR)(LPTSTR)aCurrencyHelpIds ); break; } case ( WM_CONTEXTMENU ) : // right mouse click { WinHelp( (HWND)wParam, szHelpFile, HELP_CONTEXTMENU, (DWORD_PTR)(LPTSTR)aCurrencyHelpIds ); break; } case ( WM_COMMAND ) : { switch ( LOWORD(wParam) ) { case ( IDC_CURRENCY_SYMBOL ) : { if (HIWORD(wParam) == CBN_SELCHANGE || HIWORD(wParam) == CBN_EDITCHANGE) { lpPropSheet->lParam |= CC_SCurrency; } break; } case ( IDC_POS_CURRENCY_SYM ) : { if (HIWORD(wParam) == CBN_SELCHANGE) { lpPropSheet->lParam |= CC_CurrSymPos; } break; } case ( IDC_NEG_NUM_FORMAT ) : { if (HIWORD(wParam) == CBN_SELCHANGE) { lpPropSheet->lParam |= CC_NegCurrFmt; } break; } case ( IDC_DECIMAL_SYMBOL ) : { if (HIWORD(wParam) == CBN_SELCHANGE || HIWORD(wParam) == CBN_EDITCHANGE) { lpPropSheet->lParam |= CC_SMonDec; } break; } case ( IDC_NUM_DECIMAL_DIGITS ) : { if (HIWORD(wParam) == CBN_SELCHANGE) { lpPropSheet->lParam |= CC_ICurrDigits; } break; } case ( IDC_DIGIT_GROUP_SYMBOL ) : { if (HIWORD(wParam) == CBN_SELCHANGE || HIWORD(wParam) == CBN_EDITCHANGE) { lpPropSheet->lParam |= CC_SMonThousand; } break; } case ( IDC_NUM_DIGITS_GROUP ) : { if (HIWORD(wParam) == CBN_SELCHANGE) { lpPropSheet->lParam |= CC_DMonGroup; } break; } } // // Turn on ApplyNow button. // if (lpPropSheet->lParam > CC_EverChg) { PropSheet_Changed(GetParent(hDlg), hDlg); } break; } default : { return (FALSE); } } // // Return success. // return (TRUE); }