Subcategory of local change management for decimal numbers (format [character] [xxx ...] [decimal separator] [yy ...])

INTRODUCTION AND RELATED INFORMATION:

I have edit controlone that should only accept signed decimal numbers - something like -123.456. In addition, he must know the locale , since the decimal separator is not the same for each country - at the point of the USA, and in Europe - a comma, etc.

MY EFFORTS TO SOLVE THIS:

So far I have used subclassingto implement this. Here is my implementation logic subclassing, expressed through pseudocode:

if ( ( character is not a [ digit,separator, or CTRL/Shift... ] OR
     ( char is separator and we already have one ) )
{
    discard the character;
}

First, I created a helper function that determines if the char array has a decimal separator, for example:

bool HasDecimalSeparator( wchar_t *test )
{
    // get the decimal separator
    wchar_t szBuffer[5];

    GetLocaleInfo ( LOCALE_USER_DEFAULT, 
                    LOCALE_SDECIMAL, 
                    szBuffer, 
                    sizeof(szBuffer) / sizeof(szBuffer[0] ) );

    bool p = false; // text already has decimal separator?
    size_t i = 0;   // needed for while loop-iterator

    // go through entire array and calculate the value of the p

    while( !( p = ( test[i] == szBuffer[0] ) ) && ( i++ < wcslen(test) ) );

    return p;
}

subclass inging :

LRESULT CALLBACK Decimalni( HWND hwnd, UINT message, 
    WPARAM wParam, LPARAM lParam, 
    UINT_PTR uIdSubclass, 
    DWORD_PTR dwRefData )
{
    switch (message)
    {
    case WM_CHAR:
        {
            // get decimal separator
            wchar_t szBuffer[5];

            GetLocaleInfo ( LOCALE_USER_DEFAULT, 
                LOCALE_SDECIMAL, 
                szBuffer, 
                sizeof(szBuffer) / sizeof(szBuffer[0] ) );

                wchar_t t[50];  // here we store edit control current text
                memset( &t, L'\0', sizeof(t) );

                // get edit control current text
                GetWindowText( hwnd, t, 50 );

                // if ( ( is Not a ( digit,separator, or CTRL/Shift... )
                // || ( char is separator and we already have one ) )
                // discard the character

                if( ( !( isdigit(wParam) || ( wParam == szBuffer[0] ) ) 
                    && ( wParam >= L' ' ) )     // digit/separator/... ?
                    || ( HasDecimalSeparator(t)        // has separator?    
                    && ( wParam == szBuffer[0] ) ) )
                {
                    return 0;
                }
            }
            break;
    }
    return DefSubclassProc( hwnd, message, wParam, lParam);
}

: , .

:

, ?

subclass ing - , /?

.

.

:

, , subclass, - , :

#include <windows.h>
#include <commctrl.h>
#include <stdlib.h>
#include <locale.h>

#pragma comment( lib, "comctl32.lib")

const wchar_t g_szClassName[] = L"myWindowClass";

bool HasDecimalSeparator( wchar_t *test )
{
    // get the decimal separator
    wchar_t szBuffer[5];

    GetLocaleInfo ( LOCALE_USER_DEFAULT, 
                    LOCALE_SDECIMAL, 
                    szBuffer, 
                    sizeof(szBuffer) / sizeof(szBuffer[0] ) );

    bool p = false; // text already has decimal separator?
    size_t i = 0;   // needed for while loop-iterator

    // go through entire array and calculate the value of the p

    while( !( p = ( test[i] == szBuffer[0] ) ) && ( i++ < wcslen(test) ) );

    return p;
}

LRESULT CALLBACK Decimalni( HWND hwnd, UINT message, 
    WPARAM wParam, LPARAM lParam, 
    UINT_PTR uIdSubclass, 
    DWORD_PTR dwRefData )
{
    switch (message)
    {
    case WM_CHAR:
        {
            // get decimal separator
            wchar_t szBuffer[5];

            GetLocaleInfo ( LOCALE_USER_DEFAULT, 
                LOCALE_SDECIMAL, 
                szBuffer, 
                sizeof(szBuffer) / sizeof(szBuffer[0] ) );

                wchar_t t[50];  // here we store edit control current text
                memset( &t, L'\0', sizeof(t) );

                // get edit control current text
                GetWindowText( hwnd, t, 50 );

                // if ( ( is Not a ( digit,separator, or CTRL/Shift... )
                // || ( char is separator and we already have one ) )
                // discard the character

                if( ( !( isdigit(wParam) || ( wParam == szBuffer[0] ) ) 
                    && ( wParam >= L' ' ) )     // digit/separator/... ?
                    || ( HasDecimalSeparator(t)        // has separator?    
                    && ( wParam == szBuffer[0] ) ) )
                {
                    return 0;
                }
            }
            break;
    }
    return DefSubclassProc( hwnd, message, wParam, lParam);
}

LRESULT CALLBACK WndProc(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam)
{
    switch(msg)
    {
    case WM_CREATE:
        {
            /************* load current locale settings *************/

            // max. len: language, country, code page

            wchar_t lpszLocale[64+64+16+3] = L""; 
            wchar_t lpszVal[128];

            LCID nLCID = ::GetUserDefaultLCID(); // current LCID for user
            if ( ::GetLocaleInfo( nLCID, LOCALE_SENGLANGUAGE, lpszVal, 128 ) )
            {
                wcscat_s( lpszLocale, 147, lpszVal ); // language
                if ( ::GetLocaleInfo( nLCID, LOCALE_SENGCOUNTRY, lpszVal, 128 ) )
                {
                    wcscat_s( lpszLocale, 147, L"_" ); // append country/region
                    wcscat_s( lpszLocale, 147, lpszVal );

                    if ( ::GetLocaleInfo( nLCID, 
                        LOCALE_IDEFAULTANSICODEPAGE, lpszVal, 128 ) )
                    { 
                        // missing code page or page number 0 is no error 
                        // (e.g. with Unicode)

                        int nCPNum = _wtoi(lpszVal);
                        if (nCPNum >= 10)
                        {
                            wcscat_s( lpszLocale, 147, L"." ); // append code page
                            wcscat_s( lpszLocale, 147, lpszVal );
                        }
                    }
                }
            }
            // set locale and LCID
            _wsetlocale( LC_ALL, lpszLocale );
            ::SetThreadLocale(nLCID);

            /*************************************************/

            HWND hEdit1;

            hEdit1 = CreateWindowEx(0, L"EDIT", L"", 
                WS_BORDER | WS_CHILD | WS_VISIBLE | ES_AUTOVSCROLL | ES_AUTOHSCROLL, 
                50, 100, 100, 20, 
                hwnd, (HMENU)8001, GetModuleHandle(NULL), NULL);

            SetWindowSubclass( hEdit1, Decimalni, 0, 0);

        }
        break;

    case WM_SETTINGCHANGE:
        if( !wParam && !wcscmp( (wchar_t*)lParam, L"intl" ) )
        {
            // max. len: language, country, code page
            wchar_t lpszLocale[64+64+16+3] = L""; 
            wchar_t lpszVal[128];

            LCID nLCID = ::GetUserDefaultLCID(); // current LCID for user
            if ( ::GetLocaleInfo( nLCID, LOCALE_SENGLANGUAGE, lpszVal, 128 ) )
            {
                wcscat_s( lpszLocale, 147, lpszVal ); // language
                if ( ::GetLocaleInfo( nLCID, LOCALE_SENGCOUNTRY, lpszVal, 128 ) )
                {
                    wcscat_s( lpszLocale, 147, L"_" ); // append country/region
                    wcscat_s( lpszLocale, 147, lpszVal );
                    if ( ::GetLocaleInfo( nLCID, 
                        LOCALE_IDEFAULTANSICODEPAGE, lpszVal, 128 ) )
                    { 
                        // missing code page or page number 0 is no error
                        // (e.g. with Unicode)
                        int nCPNum = _wtoi(lpszVal);
                        if (nCPNum >= 10)
                        {
                             wcscat_s( lpszLocale, 147, L"." ); // append code page
                             wcscat_s( lpszLocale, 147, lpszVal );
                        }
                    }
                 }
             }
             // set locale and LCID
             _wsetlocale( LC_ALL, lpszLocale );
             ::SetThreadLocale(nLCID);

             return 0L;
         }
         else
             break;

    case WM_CLOSE:
        DestroyWindow(hwnd);
        break;
    case WM_DESTROY:
        PostQuitMessage(0);
        break;
    default:
        return DefWindowProc(hwnd, msg, wParam, lParam);
    }
    return 0;
}

int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance,
    LPSTR lpCmdLine, int nCmdShow)
{
    WNDCLASSEX wc;
    HWND hwnd;
    MSG Msg;

    wc.cbSize        = sizeof(WNDCLASSEX);
    wc.style         = 0;
    wc.lpfnWndProc   = WndProc;
    wc.cbClsExtra    = 0;
    wc.cbWndExtra    = 0;
    wc.hInstance     = hInstance;
    wc.hIcon         = LoadIcon(NULL, IDI_APPLICATION);
    wc.hCursor       = LoadCursor(NULL, IDC_ARROW);
    wc.hbrBackground = (HBRUSH)(COLOR_WINDOW+1);
    wc.lpszMenuName  = NULL;
    wc.lpszClassName = g_szClassName;
    wc.hIconSm       = LoadIcon(NULL, IDI_APPLICATION);

    if(!RegisterClassEx(&wc))
    {
        MessageBox(NULL, L"Window Registration Failed!", L"Error!",
            MB_ICONEXCLAMATION | MB_OK);
        return 0;
    }

    hwnd = CreateWindowEx(
        0,
        g_szClassName,
        L"theForger Tutorial Application",
        WS_OVERLAPPEDWINDOW,
        CW_USEDEFAULT, CW_USEDEFAULT, 480, 320,
        NULL, NULL, hInstance, NULL);

    if(hwnd == NULL)
    {
        MessageBox(NULL, L"Window Creation Failed!", L"Error!",
            MB_ICONEXCLAMATION | MB_OK);
        return 0;
    }

    ShowWindow(hwnd, nCmdShow);
    UpdateWindow(hwnd);

    while(GetMessage(&Msg, NULL, 0, 0) > 0)
    {
        TranslateMessage(&Msg);
        DispatchMessage(&Msg);
    }
    return Msg.wParam;
}
+4
2

, , , VarI4FromStr API, . , LONG. .

" "

, . , ? , , , , . , , "", . , , , EN_CHANGE . , .

, - (, , ) , .

+5

, , , ,

, , , .

VK_DELETE , , , . , , else . WM_CUT, WM_CLEAR backspace WM_CHAR ( , -1, , if ( start > 0 )).

WM_PASTE , , . , , , .

WM_CHAR, , , .

, WM_UNDO.

, :

LRESULT CALLBACK Decimalni( HWND hwnd, UINT message, 
    WPARAM wParam, LPARAM lParam, UINT_PTR uIdSubclass, DWORD_PTR dwRefData )
{

    switch (message)
    {
    case WM_KEYDOWN:
        {
            if( wParam == VK_DELETE )
            {
                DWORD start, end;

                int len = GetWindowTextLength(hwnd);

                std::wstring buffer( len, 0 );

                // get current window text

                if( len > 0 )
                   GetWindowText( hwnd, &buffer[0], len + 1 );

                // get current selection
                SendMessage( hwnd, EM_GETSEL, (WPARAM)&start, (LPARAM)&end );

                if( end > start )
                    buffer.erase( start, end - start );
                else
                    buffer.erase( start, 1 );

                if( buffer.empty() )
                    return ::DefSubclassProc( hwnd, message, wParam, lParam);

                bool IsTextValid = true; // indicates validity of inputed text

                // TODO: parse buffer

                if( IsTextValid )
                     return ::DefSubclassProc( hwnd, message, wParam, lParam);
                else
                {
                     // TODO: indicate error
                     return FALSE;
                }
            }
        }
        return ::DefSubclassProc( hwnd, message, wParam, lParam);;
        break;
    case WM_CLEAR:
    case WM_CUT:
        {
            DWORD start, end;

            int len = GetWindowTextLength(hwnd);

            std::wstring buffer( len, 0 );

            // get current window text

           if( len > 0 )
               GetWindowText( hwnd, &buffer[0], len + 1 );

            // get current selection
            SendMessage( hwnd, EM_GETSEL, (WPARAM)&start, (LPARAM)&end );

            if( end > start )
                buffer.erase( start, end - start );

            if( buffer.empty() )
                return ::DefSubclassProc( hwnd, message, wParam, lParam);

            // TODO: parse buffer 
            bool IsTextValid = true;

            if( IsTextValid )
                return ::DefSubclassProc( hwnd, message, wParam, lParam);
            else
            {
                // TODO: Indicate error
                return FALSE;
            }
        }
        break;
    case WM_PASTE:
        {
            int len = GetWindowTextLength(hwnd);

            std::wstring clipboard, wndtxt( len, 0 );

            if( len > 0 )
                GetWindowText( hwnd, &wndtxt[0], len + 1 );

            if( !OpenClipboard(hwnd) )
                return FALSE;

            HANDLE hClipboardData;

            if( hClipboardData = GetClipboardData(CF_UNICODETEXT) )
            {
                 clipboard = (wchar_t*)GlobalLock(hClipboardData);
                 GlobalUnlock(hClipboardData);  

            }

            CloseClipboard();

            if( clipboard.empty() )
                return FALSE;

            DWORD start, end;
            SendMessage( hwnd, EM_GETSEL, (WPARAM)&start, (LPARAM)&end );

            // merge strings into one
            if( end > start )
               wndtxt.replace( start, end - start, clipboard );
            else
                wndtxt.insert( start, clipboard );

            // TODO: parse the text
            bool ITextValid = true;

            // process the result
            if( IsTextValid )
                return ::DefSubclassProc( hwnd, message, wParam, lParam);
            else
            {
                // TODO: indicate error
                return FALSE;
            }

        }
        break;
    case WM_CHAR:
        {
            DWORD start, end;

            int len = GetWindowTextLength(hwnd);

            std::wstring buffer( len, 0 );

            // get current window text

            if( len > 0 )
                GetWindowText( hwnd, &buffer[0], len + 1 );

            // get current selection
            SendMessage( hwnd, EM_GETSEL, (WPARAM)&start, (LPARAM)&end );

            // allow copy/paste but leave backspace for special handler
            if( ( wParam < 0x020 ) && ( wParam != 0x08 ) )
                return ::DefSubclassProc( hwnd, message, wParam, lParam);}

            // process backspace
            if( wParam == 0x08 ) 
            {
                if( end > start )
                    buffer.erase( start, end - start );
                else
                    if( start > 0 )    // it is safe to move back one place
                        buffer.erase( start - 1, 1 );
                    else  // start-1 < 0 , can't access buffer[-1] !!
                        return FALSE;

                if( buffer.empty() )
                    return ::DefSubclassProc( hwnd, message, wParam, lParam);

                // TODO: parse buffer

                // process the result
                if( IsTextValid )
                     return ::DefSubclassProc( hwnd, message, wParam, lParam);
                else
                {
                     //TODO: indicate error
                     return FALSE;
                }
            }

            // insert character and parse text

            if( end > start )
                buffer.replace( start, end - start, 1, (wchar_t)wParam );
            else
                buffer.insert( start, 1, (wchar_t)wParam );

            // TODO: parse text

            // process the result
            if( IsTextValid )
                return ::DefSubclassProc( hwnd, message, wParam, lParam);
            else
            {
                //TODO: indicate error
                return FALSE;
            }
        }
        break;
    case WM_NCDESTROY:
        ::RemoveWindowSubclass( hwnd, Decimalni, 0 );
        break;
    }
    return ::DefSubclassProc( hwnd, message, wParam, lParam);
}
+2

Source: https://habr.com/ru/post/1527175/


All Articles