6. 键盘.txt

本书介绍了在Microsoft Windows 98、Microsoft Windows NT 4.0和Windows NT 5.0下程序写作的方法

    static TCHAR szAppName[]      = TEXT ("KeyView1") ;
        
    HWND                  hwnd ;
        
    MSG                   msg ;
        
    WNDCLASS              wndclass ;
        
   
        
    wndclass.style                       = CS_HREDRAW | CS_VREDRAW ;
        
    wndclass.lpfnWndProc          = WndProc ;
        
    wndclass.cbClsExtra           = 0 ;
        
    wndclass.cbWndExtra           = 0 ;
        
    wndclass.hInstance                   = hInstance ;
        
    wndclass.hIcon                      = LoadIcon (NULL, IDI_APPLICATION) ;
        
    wndclass.hCursor                     = LoadCursor (NULL, IDC_ARROW) ;
        
    wndclass.hbrBackground               = (HBRUSH) GetStockObject (WHITE_BRUSH) ;
        
    wndclass.lpszMenuName         = NULL ;
        
    wndclass.lpszClassName        = szAppName ;
        

    if (!RegisterClass (&wndclass))
        
    {
        
            MessageBox (NULL, TEXT ("This program requires Windows NT!"),
        
                                          szAppName, MB_ICONERROR) ;
        
            return 0 ;
        
    }
        
  
        
    hwnd = CreateWindow (szAppName, TEXT ("Keyboard Message Viewer #1"),
        
                                                  WS_OVERLAPPEDWINDOW,
        
                                                  CW_USEDEFAULT, CW_USEDEFAULT,
        
                                                  CW_USEDEFAULT, CW_USEDEFAULT,
        
                                                  NULL, NULL, hInstance, NULL) ;
        
   
        
    ShowWindow (hwnd, iCmdShow) ;
        
    UpdateWindow (hwnd) ;
        
   
        
    while (GetMessage (&msg, NULL, 0, 0))
        
    {
        
            TranslateMessage (&msg) ;
        
            DispatchMessage (&msg) ;
        
    }
        
            return msg.wParam ;
        
}
        

LRESULT CALLBACK WndProc (HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
        
{
        
    static int   cxClientMax, cyClientMax, cxClient, cyClient, cxChar, cyChar ;
        
    static int   cLinesMax, cLines ;
        
    static PMSG  pmsg ;
        
    static RECT  rectScroll ;
        
    static TCHAR szTop[] = TEXT ("Message Key  Char ")
        
                                                          TEXT ("Repeat Scan Ext ALT Prev Tran") ;
        
    static TCHAR szUnd[] = TEXT ("_______        ___       ____     ")
        
                                                          TEXT ("______ ____ ___ ___ ____ ____") ;
        

    static TCHAR * szFormat[2] = {
        
                           TEXT ("%-13s %3d %-15s%c%6u %4d %3s %3s %4s %4s"),
        
                           TEXT ("%-13s  0x%04X%1s%c %6u %4d %3s %3s %4s %4s") } ;
        
            static TCHAR * szYes  = TEXT ("Yes") ;
        
            static TCHAR * szNo   = TEXT ("No") ;
        
            static TCHAR * szDown = TEXT ("Down") ;
        
            static TCHAR * szUp   = TEXT ("Up") ;
        

            static TCHAR * szMessage [] = {
        
            TEXT ("WM_KEYDOWN"),  TEXT ("WM_KEYUP"),
        
            TEXT ("WM_CHAR"),     TEXT ("WM_DEADCHAR"),
        
            TEXT ("WM_SYSKEYDOWN"),TEXT ("WM_SYSKEYUP"),
        
            TEXT ("WM_SYSCHAR"),  TEXT ("WM_SYSDEADCHAR") } ;
        
            HDC                   hdc ;
        
            int                   i, iType ;
        
            PAINTSTRUCT           ps ;
        
            TCHAR                 szBuffer[128], szKeyName [32] ;
        
            TEXTMETRIC            tm ;
        
  
        
    switch (message)
        
    {
        
    case WM_CREATE:
        
    case WM_DISPLAYCHANGE:
        
                           // Get maximum size of client area
        
            cxClientMax = GetSystemMetrics (SM_CXMAXIMIZED) ;
        
            cyClientMax = GetSystemMetrics (SM_CYMAXIMIZED) ;
        

                           // Get character size for fixed-pitch font
        
            hdc = GetDC (hwnd) ;
        
            SelectObject (hdc, GetStockObject (SYSTEM_FIXED_FONT)) ;
        
            GetTextMetrics (hdc, &tm) ;
        
            cxChar = tm.tmAveCharWidth ;
        
            cyChar = tm.tmHeight ;
        

            ReleaseDC (hwnd, hdc) ;
        
                           // Allocate memory for display lines
        
            if (pmsg)
        
                   free (pmsg) ;
        
                   cLinesMax = cyClientMax / cyChar ;
        
                   pmsg = malloc (cLinesMax * sizeof (MSG)) ;
        
                   cLines = 0 ;
        
                   // fall through
        
    case WM_SIZE:
        
            if (message == WM_SIZE)
        
            {
        
                   cxClient = LOWORD (lParam) ;
        
                   cyClient = HIWORD (lParam) ;
        
            }
        
                                   // Calculate scrolling rectangle
        
            rectScroll.left       = 0 ;
        
            rectScroll.right      = cxClient ;
        
            rectScroll.top        = cyChar ;
        
            rectScroll.bottom     = cyChar * (cyClient / cyChar) ;
        

            InvalidateRect (hwnd, NULL, TRUE) ;
        
            return 0 ;
        
        
        
    case WM_KEYDOWN:
        
    case WM_KEYUP:
        
    case WM_CHAR:
        
    case WM_DEADCHAR:
        
    case WM_SYSKEYDOWN:
        
    case WM_SYSKEYUP:
        
    case WM_SYSCHAR:
        
    case WM_SYSDEADCHAR:
        
                                   // Rearrange storage array
        
            for (i = cLinesMax - 1 ; i > 0 ; i--)
        
            {
        
                           pmsg[i] = pmsg[i - 1] ;
        
            }
        
                                   // Store new message
        
            pmsg[0].hwnd = hwnd ;
        
            pmsg[0].message = message ;
        
            pmsg[0].wParam = wParam ;
        
            pmsg[0].lParam = lParam ;
        

            cLines = min (cLines + 1, cLinesMax) ;
        
                                   // Scroll up the display
        
            ScrollWindow (hwnd, 0, -cyChar, &rectScroll, &rectScroll) ;
        
            break ;               // i.e., call DefWindowProc so Sys messages work
        
    case WM_PAINT:
        
            hdc = BeginPaint (hwnd, &ps) ;
        
            SelectObject (hdc, GetStockObject (SYSTEM_FIXED_FONT)) ;
        
            SetBkMode (hdc, TRANSPARENT) ;
        
            TextOut (hdc, 0, 0, szTop, lstrlen (szTop)) ;
        
            TextOut (hdc, 0, 0, szUnd, lstrlen (szUnd)) ;
        

            for (i = 0 ; i < min (cLines, cyClient / cyChar - 1) ; i++)
        
            {
        
                   iType =       pmsg[i].message == WM_CHAR ||
        
                                   pmsg[i].message == WM_SYSCHAR ||
        
                                   pmsg[i].message == WM_DEADCHAR ||
        
                                   pmsg[i].message == WM_SYSDEADCHAR ;
        

                   GetKeyNameText (pmsg[i].lParam, szKeyName,
        
                                          sizeof (szKeyName) / sizeof (TCHAR)) ;
        

            TextOut (hdc, 0, (cyClient / cyChar - 1 - i) * cyChar, szBuffer,
        
            wsprintf (szBuffer, szFormat [iType],
        
            szMessage [pmsg[i].message - WM_KEYFIRST],
        
            pmsg[i].wParam,
        
            (PTSTR) (iType ? TEXT (" ") : szKeyName),
        
            (TCHAR) (iType ? pmsg[i].wParam : ' '),
        
            LOWORD (pmsg[i].lParam),
        
            HIWORD (pmsg[i].lParam) & 0xFF,
        
                           0x01000000 & pmsg[i].lParam ? szYes  : szNo,
        
                           0x20000000 & pmsg[i].lParam ? szYes  : szNo,
        
                           0x40000000 & pmsg[i].lParam ? szDown : szUp,
        
                           0x80000000 & pmsg[i].lParam ? szUp   : szDown)) ;
        
            }
        
            EndPaint (hwnd, &ps) ;
        
            return 0 ;
        

    case   WM_DESTROY:
        
            PostQuitMessage (0) ;
        
            return 0 ;
        
    }
        
    return DefWindowProc (hwnd, message, wParam, lParam) ;
        
}
        
KEYVIEW1显示窗口消息处理程序接收到的每次按键和字符消息的内容，并将这些消息储存在一个MSG结构的数组中。该数组的大小依据最大化窗口的大小和等宽的系统字体。如果使用者在程序执行时调整了视讯显示的大小（在这种情况下KEYVIEW1接收WM_DISPLAYCHANGE消息），将重新分配此数组。KEYVIEW1使用标准C的malloc函数为数组配置内存。

图6-2给出了在键入「Windows」之后KEYVIEW1的屏幕显示。第一列显示了键盘消息；第二列在键名称的前面显示了按键消息的虚拟键代码，此代码是经由GetKeyNameText函数取得的；第三列（标注为「Char」）在字符本身的后面显示字符消息的十六进制字符代码。其余六列显示了lParam消息参数中六个字段的状态。


　



图6-2 KEYVIEW1的屏幕显示
 

为便于以分行的方式显示此信息，KEYVIEW1使用了等宽字体。与前一章所讨论的一样，这需要呼叫GetStockObject和SelectObject：

SelectObject (hdc, GetStockObject (SYSTEM_FIXED_FONT)) ;
        
KEYVIEW1在显示区域上部画了一个标题以确定分成九行。此列文字带有底线。虽然可以建立一种带底线的字体，但这里使用了另一种方法。我定义了两个字符串变量szTop（有文字）和szUnd（有底线），并在WM_PAINT消息处理期间将它们同时显示在窗口顶部的同一位置。通常，Windows以一种「不透明」的方式显示文字，也就是说显示字符时Windows将擦除字符背景区。这将导致第二个字符串（szUnd）擦除掉前一个（szTop）。要防止这一现象的发生，可将设备内容切换到「透明」模式：

SetBkMode (hdc, TRANSPARENT) ;
        
这种加底线的方法只有在使用等宽字体时才可行。否则，底线字符将无法与显现在底线上面的字符等宽。

外语键盘问题


如果您执行美国英语版本的Windows，那么您可安装不同的键盘布局，并输入外语。可以在 控制台的键盘中安装外语键盘布局。选择 语系页面标签，按下新增 键。要查看死键的工作方式，您可能想安装「德语」键盘。此外，我还要讨论「俄语」和「希腊语」的键盘布局，因此您也可安装这些键盘布局。如果在「键盘」显示的列表中找不到「俄语」和「希腊语」的键盘布局，则需要安装多语系支持：从「控制台」中选择 新增/删除程序，然后选择 Windows安装程序页面卷标，确认选中 多语系支持复选框。在任何情况下，这些变更都需要原始的Windows光盘。

安装完其它键盘布局后，您将在工作列右侧的通知区看到一个带有两个字母代码的蓝色框。如果内定的是英语，那么这两个字母是「EN」。单击此图标，将得到所有已安装键盘布局的列表。从中单击需要的键盘布局即可更改目前活动程序的键盘。此改变只影响目前活动的程序。

现在开始进行实验。不使用UNICODE标识符定义来编译KEYVIEW1程序（在本书附带的光盘中，非Unicode版本的KEYVIEW1程序位于RELEASE子目录）。在美国英语版本的Windows下执行该程序，并输入字符『abcde』。 WM_CHAR消息与您所期望的一样：ASCII字符代码0x61、0x62、0x63、0x64和0x65以及字母a、b、c、d和e。

现在，KEYVIEW1还在执行，选择德语键盘布局。按下=键然后输入一个元音（a、e、i、o或者u）。=键将产生一个WM_DEADCHAR消息，元音产生一个WM_CHAR消息和（单独的）字符代码0xE1、0xE9、0xED、0xF3、0xFA和字符á、é、í、ó或ú。这就是死键的工作方式。

现在选择希腊键盘布局。输入『abcde』，您会得到什么？您将得到WM_CHAR消息和字符代码0xE1、0xE2、0xF8、0xE4