/************************************************
* этот код распределяет MSH_MOUSEWHEEL
*************************************************/
#include "zmouse.h"

//
// Mouse wheel для вращения используется только тогда, если
// мы в версии  ОС, которая не поддерживает
// сообщения WM_MOUSEWHEEL.
//
#ifndef WM_MOUSEWHEEL
#define WM_MOUSEWHEEL WM_MOUSELAST+1 
    // Идентификатор (ID) сообщения для IntelliMouse wheel
#endif

UINT uMSH_MOUSEWHEEL = 0;   // Значение возвращается из
                            // RegisterWindowMessage()

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

INT WINAPI WinMain(
         HINSTANCE hInst, 
         HINSTANCE hPrevInst, 
         LPSTR lpCmdLine, 
         INT nCmdShow)
{
    MSG msg;
    BOOL bRet;

    if (!InitInstance(hInst, nCmdShow))
        return FALSE;

    //
    // Новая IntelliMouse использует зарегистрированное сообщение,
    // чтобы транслировать информацию о вращении колесика. Так зарегистрируем его!
 
    uMSH_MOUSEWHEEL =
     RegisterWindowMessage(MSH_MOUSEWHEEL); 
    if ( !uMSH_MOUSEWHEEL )
    {
        MessageBox(NULL,"
                   RegisterWindowMessag Failed!",
                   "Error",MB_OK);
        return msg.wParam;
    }
    
    while (( bRet = GetMessage(&msg, NULL, 0, 0)) != 0)
    {
        if (bRet == -1)
        {
            // обработка ошибки и возможный выход из программы
        }
        else
        {
            if (!TranslateAccelerator(ghwndApp,
                                      ghaccelTable,
                                      &msg))
            {
                TranslateMessage(&msg);
                DispatchMessage(&msg);
            }
        }
    }

    return msg.wParam;
}

/************************************************
* этот код распределяет  WM_MOUSEWHEEL
*************************************************/
LONG APIENTRY MainWndProc(
    HWND hwnd,
    UINT msg,
    WPARAM wParam,
    LPARAM lParam)
{
    static int nZoom = 0;
    

    switch (msg)
    {
        //
        // Обработка сообщений модуля Mouse Wheel созданных
        // операционными системами , которые имеют встроенную
        // поддержку сообщений WM_MOUSEWHEEL.
        //

        case WM_MOUSEWHEEL:
            ((short) HIWORD(wParam)< 0) ? nZoom-- : nZoom++;

            //
            // Делаем другое колесико используемым...
            //

            break;

        default:
            //
            // uMSH_MOUSEWHEEL является зарегистрированным сообщением
            // библиотеки mswheel.dll для версии Windows, которая
            // не поддерживает эти новые сообщения в ОС.

            if( msg == uMSH_MOUSEWHEEL )
            {
               ((int)wParam < 0) ? nZoom-- : nZoom++;

                //
                // Делаем другое колесико используемым...
                //
                break;
            }

            return DefWindowProc(hwnd,
                                 msg,
                                 wParam,
                                 lParam);
    }

    return 0L;
}