开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Windows编程 > 查看源码
MULTIWND.C
资源名称：MSDN_VC98.zip　[点击查看]
上传用户：bangxh
上传日期：2007-01-31
资源大小：42235k
文件大小：17k
源码类别：

Windows编程

开发平台：

Visual C++

MULTIWND.C：源码内容
  1. /**********************************************************************/
  2. /*                                                                    */
  3. /*      MULTIWND.C                                                    */
  4. /*                                                                    */
  5. /*      Copyright (c) 1995-1996  Microsoft Corporation                     */
  6. /*                                                                    */
  7. /**********************************************************************/
  9. #include "windows.h"
  10. #include "imm.h"
  11. #include "resource.h"
  12. #include "multiui.h"
  15. /**********************************************************************/
  16. /*                                                                    */
  17. /*    InitStringBuffer(HWND)                                          */
  18. /*                                                                    */
  19. /**********************************************************************/
  20. void FAR PASCAL InitStringBuffer(hWnd)
  21. HWND hWnd;
  22. {
  23.     LPSTR lpStr = NULL;
  25.     if (lpStr = GlobalAlloc(GPTR,MAXSIZE_STR))
  26.     {
  27.         SetWindowLong(hWnd,MYGWL_LPSTR,(LONG)lpStr);
  28.     }
  29.     else
  30.     {
  31.         SetWindowLong(hWnd,MYGWL_LPSTR,(LONG)0L);
  32.     }
  33. }
  35. /**********************************************************************/
  36. /*                                                                    */
  37. /*    DestroyStringBuffer(HWND)                                       */
  38. /*                                                                    */
  39. /**********************************************************************/
  40. void FAR PASCAL DestroyStringBuffer(hWnd)
  41. HWND hWnd;
  42. {
  43.     LPSTR lpStr = NULL;
  45.     lpStr = (LPSTR)GetWindowLong(hWnd,MYGWL_LPSTR);
  46.     if (lpStr)
  47.     {
  48.         GlobalFree((HANDLE)lpStr);
  49.     }
  50. }
  52. /**********************************************************************/
  53. /*                                                                    */
  54. /*    MyDrawString(HWND,WPARAM,LPARAM)                                */
  55. /*                                                                    */
  56. /**********************************************************************/
  57. void FAR PASCAL MyDrawString(hWnd,wParam,lParam)
  58. HWND hWnd;
  59. WPARAM wParam;
  60. LPARAM lParam;
  61. {
  62.     LPSTR lpStr = NULL;
  63.     HDC   hDC;
  64.     PAINTSTRUCT ps;
  65.     HFONT hOldFont;
  66.     HFONT hFont;
  67.     DWORD dwHeight;
  68.     TEXTMETRIC      tm;
  69.     RECT rc;
  71.     lpStr = (LPSTR)GetWindowLong(hWnd,MYGWL_LPSTR);
  72.     if (!lpStr)
  73.         return;
  75.     hFont = (HFONT)GetWindowLong(hWnd,MYGWL_FONT);
  76.     if (!hFont)
  77.         return;
  80.     hDC = BeginPaint(hWnd, &ps);
  81.     hOldFont = SelectObject(hDC, hFont);
  83.     lpStr = (LPSTR)GetWindowLong(hWnd,MYGWL_LPSTR);
  84.     // Get dwHeight.
  85.     GetTextMetrics(hDC,&tm);
  86.     dwHeight = tm.tmHeight + tm.tmExternalLeading;
  89.     GetClientRect(hWnd,&rc);
  90.     rc.bottom -= dwHeight;
  92.     DrawText(hDC,lpStr,-1,&rc,DT_LEFT | DT_WORDBREAK);
  94.     SelectObject(hDC, hOldFont);
  95.     EndPaint(hWnd, &ps);
  96. }
  98. /**********************************************************************/
  99. /*                                                                    */
  100. /*    MySetCompositionFont(HWND)                                      */
  101. /*                                                                    */
  102. /**********************************************************************/
  103. void FAR PASCAL MySetCompositionFont(hWnd)
  104. HWND hWnd;
  105. {
  106.     HIMC hIMC;
  108.     if (hIMC = ImmGetContext(hWnd))
  109.     {
  110.         LOGFONT lf;
  111.         HFONT   hFont = (HFONT)GetWindowLong(hWnd,MYGWL_FONT);
  112.         GetObject(hFont,sizeof(lf),&lf);
  114.         ImmSetCompositionFont(hIMC,&lf);
  115.         ImmReleaseContext(hWnd, hIMC);
  116.     }
  117. }
  119. /**********************************************************************/
  120. /*                                                                    */
  121. /*    MySetCompositionForm(HWND)                                      */
  122. /*                                                                    */
  123. /**********************************************************************/
  124. void FAR PASCAL MySetCompositionForm(hWnd)
  125. HWND hWnd;
  126. {
  127.     RECT            rc;
  128.     HIMC            hIMC;
  129.     HDC             hDC;
  130.     TEXTMETRIC      tm;
  131.     DWORD           dwHeight;
  132.     HFONT           hFont = (HFONT)GetWindowLong(hWnd,MYGWL_FONT);
  133.     HFONT           hOldFont;
  134.     COMPOSITIONFORM CompForm;
  136.     if (!hFont)
  137.         return;
  139.     if (hIMC = ImmGetContext(hWnd))
  140.     {
  141.         // Get dwHeight.
  142.         hDC = GetDC(hWnd);
  143.         hOldFont = SelectObject(hDC, hFont);
  144.         GetTextMetrics(hDC,&tm);
  145.         dwHeight = tm.tmHeight + tm.tmExternalLeading;
  146.         SelectObject(hDC, hOldFont);
  147.         ReleaseDC(hWnd,hDC);
  150.         GetClientRect(hWnd,&rc);
  151.         CompForm.dwStyle = CFS_POINT;
  152.         CompForm.ptCurrentPos.x = rc.left;
  153.         CompForm.ptCurrentPos.y = rc.bottom - dwHeight;
  154.         ImmSetCompositionWindow(hIMC,&CompForm);
  156.         ImmReleaseContext(hWnd, hIMC);
  157.     }
  158. }
  160. /**********************************************************************/
  161. /*                                                                    */
  162. /*    MyChangeFont(HWND)                                              */
  163. /*                                                                    */
  164. /**********************************************************************/
  165. void FAR PASCAL MyChangeFont(hWnd)
  166. HWND hWnd;
  167. {
  168.     LOGFONT lf;
  169.     CHOOSEFONT cf;
  170.     HFONT hFont;
  172.     /* Set all structure fields to zero. */
  173.     memset(&cf, 0, sizeof(CHOOSEFONT));
  175.     cf.lStructSize = sizeof(CHOOSEFONT);
  176.     cf.hwndOwner = hWnd;
  177.     cf.lpLogFont = &lf;
  178.     cf.Flags = CF_SCREENFONTS | CF_EFFECTS;
  179.     cf.rgbColors = RGB(0, 255, 255); /* light blue */
  180.     cf.nFontType = SCREEN_FONTTYPE;
  182.     if (ChooseFont(&cf))
  183.     {
  184.         hFont = (HFONT)GetWindowLong(hWnd,MYGWL_FONT);
  185.         DeleteObject(hFont);
  187.         hFont = CreateFontIndirect(&lf);
  188.         SetWindowLong(hWnd,MYGWL_FONT,(LONG)hFont);
  189.         MySetCompositionForm(hWnd);
  190.         MySetCompositionFont(hWnd);
  191.     }
  192.     SetFocus(hWnd);
  193. }
  195. /**********************************************************************/
  196. /*                                                                    */
  197. /*    GetDefaultGUIFont(void)                                         */
  198. /*                                                                    */
  199. /**********************************************************************/
  200. HFONT GetDefaultGUIFont(void)
  201. {
  202.     static HFONT hFont;
  203.     OSVERSIONINFO VerInfo;
  205.     if (hFont)
  206.         return hFont;
  208.     VerInfo.dwOSVersionInfoSize = sizeof(OSVERSIONINFO);
  209.     GetVersionEx(&VerInfo);
  211.     if (VerInfo.dwMajorVersion < 4) {
  212.         NONCLIENTMETRICS ncm;
  214.         ncm.cbSize = sizeof(NONCLIENTMETRICS);
  215.         SystemParametersInfo(SPI_GETNONCLIENTMETRICS, sizeof(ncm), &ncm, 0);
  216.         hFont = CreateFontIndirect(&ncm.lfStatusFont);
  218.         if (!hFont)
  219.             hFont = GetStockObject(SYSTEM_FONT);
  220.     } else {
  221.         hFont = GetStockObject(DEFAULT_GUI_FONT);
  222.     }
  224.     return hFont;
  225. }
  227. /**********************************************************************/
  228. /*                                                                    */
  229. /*    OverFlowText(HWND,LPSTR,LPSTR)                                  */
  230. /*                                                                    */
  231. /**********************************************************************/
  232. BOOL FAR PASCAL OverFlowText(hWnd,lpStr,lpResultStr)
  233. HWND hWnd;
  234. LPSTR lpStr;
  235. LPSTR lpResultStr;
  236. {
  237.     BOOL            bRet = FALSE;
  238.     RECT            rc;
  239.     HDC             hDC;
  240.     TEXTMETRIC      tm;
  241.     int             nHeight;
  242.     HFONT           hFont = (HFONT)GetWindowLong(hWnd,MYGWL_FONT);
  243.     HFONT           hOldFont;
  244.     LPSTR           lpTemp;
  246.     if (!hFont)
  247.         return FALSE;
  249.     if (lstrlen(lpStr) + lstrlen(lpResultStr) > MAXSIZE_STR)
  250.     {
  251.         bRet = TRUE;
  253.     }
  254.     else
  255.     {
  256.         lpTemp = GlobalAlloc(GPTR,MAXSIZE_STR);
  258.         if (lpTemp)
  259.         {
  260.             lstrcpy(lpTemp,lpStr);
  261.             lstrcat(lpTemp,lpResultStr);
  263.             GetClientRect(hWnd,&rc);
  265.             hDC = GetDC(hWnd);
  266.             hOldFont = SelectObject(hDC, hFont);
  267.             GetTextMetrics(hDC,&tm);
  269.             rc.bottom -= tm.tmHeight + tm.tmExternalLeading;
  270.             nHeight = rc.bottom;
  272.             if (nHeight < DrawText(hDC,lpTemp,-1,&rc,DT_LEFT | DT_WORDBREAK | DT_CALCRECT))
  273.             {
  274.                 bRet = TRUE;
  275.             }
  277.             SelectObject(hDC, hOldFont);
  278.             ReleaseDC(hWnd,hDC);
  280.             GlobalFree((HANDLE)lpTemp);
  281.         }
  282.     }
  285.     return bRet;
  286. }
  288. /**********************************************************************/
  289. /*                                                                    */
  290. /*    AddResultString(HWND)                                           */
  291. /*                                                                    */
  292. /**********************************************************************/
  293. void FAR PASCAL AddResultString(hWnd)
  294. HWND hWnd;
  295. {
  296.     HIMC  hIMC;
  297.     DWORD dwLen;
  298.     LPSTR lpStr;
  299.     LPSTR lpResultStr;
  301.     lpStr = (LPSTR)GetWindowLong(hWnd,MYGWL_LPSTR);
  303.     hIMC = ImmGetContext(hWnd);
  305.     if (!hIMC)
  306.         return;
  308.     dwLen = ImmGetCompositionString(hIMC,GCS_RESULTSTR,NULL,0L);
  310.     if (dwLen)
  311.     {
  312.         lpResultStr = GlobalAlloc(GPTR,dwLen+1);
  314.         if (lpResultStr)
  315.         {
  316.             ImmGetCompositionString(hIMC,GCS_RESULTSTR,
  317.                                                   lpResultStr,dwLen+1);
  319.             if (OverFlowText(hWnd,lpStr,lpResultStr))
  320.                 lstrcpy(lpStr,lpResultStr);
  321.             else
  322.                 lstrcat(lpStr,lpResultStr);
  324.             InvalidateRect(hWnd,NULL,TRUE);
  326.             GlobalFree((HANDLE)lpResultStr);
  327.         }
  328.     }
  330.     ImmReleaseContext(hWnd,hIMC);
  332. }
  334. /**********************************************************************/
  335. /*                                                                    */
  336. /*    NoUINoIMCWndProc(HWND, UINT, WPARAM, LPARAM)                    */
  337. /*                                                                    */
  338. /**********************************************************************/
  339. long FAR PASCAL NoUINoIMCWndProc(hWnd, message, wParam, lParam)
  340. HWND hWnd;
  341. UINT message;
  342. WPARAM wParam;
  343. LPARAM lParam;
  344. {
  345.     HFONT hFont;
  347.     switch (message) 
  348.     {
  349. case WM_CREATE:
  350.             hFont = GetDefaultGUIFont();
  351.             SetWindowLong(hWnd,MYGWL_FONT,(LONG)hFont);
  353.             InitStringBuffer(hWnd);
  355.     break;
  357.         case WM_LBUTTONDBLCLK:
  358.             MyChangeFont(hWnd);
  359.     break;
  361.         case WM_LBUTTONDOWN:
  362.             SetFocus(hWnd);
  363.     break;
  365.         case WM_SETFOCUS:
  366.             MySetCompositionFont(hWnd);
  367.             MySetCompositionForm(hWnd);
  368.     break;
  370.         case WM_IME_COMPOSITION:
  371.             if (lParam & GCS_RESULTSTR)
  372.             {
  373.                 AddResultString(hWnd);
  374.             }
  375.     return (DefWindowProc(hWnd, message, wParam, lParam));
  376.     break;
  378.         case WM_SIZE:
  379.             switch (wParam)
  380.             {
  381.                 case SIZENORMAL:
  382.                 case SIZEFULLSCREEN:
  383.                     if (hWnd == GetFocus())
  384.                     {
  385.                         MySetCompositionForm(hWnd);
  386.                     }
  387.                     InvalidateRect(hWnd,NULL,TRUE);
  388.                     break;
  391.                 case SIZEICONIC:
  392.             return (DefWindowProc(hWnd, message, wParam, lParam));
  393.                     break;
  394.             }
  395.     break;
  398. case WM_PAINT:
  399.             MyDrawString(hWnd,wParam,lParam);
  400.     break;
  402. case WM_DESTROY:
  403.             hFont = (HFONT)GetWindowLong(hWnd,MYGWL_FONT);
  404.             DeleteObject(hFont);
  406.             DestroyStringBuffer(hWnd);
  408.     break;
  410. default:
  411.     return (DefWindowProc(hWnd, message, wParam, lParam));
  412.     }
  413.     return 0L;
  415. }
  417. /**********************************************************************/
  418. /*                                                                    */
  419. /*    NoUIOwnIMCWndProc(HWND, UINT, WPARAM, LPARAM)                   */
  420. /*                                                                    */
  421. /**********************************************************************/
  422. long FAR PASCAL NoUIOwnIMCWndProc(hWnd, message, wParam, lParam)
  423. HWND hWnd;
  424. UINT message;
  425. WPARAM wParam;
  426. LPARAM lParam;
  427. {
  428.     HIMC hIMC;
  429.     HFONT hFont;
  431.     switch (message) 
  432.     {
  433. case WM_CREATE:
  434.             hFont = GetDefaultGUIFont();
  435.             SetWindowLong(hWnd,MYGWL_FONT,(LONG)hFont);
  437.             hIMC = ImmCreateContext();
  438.             ImmAssociateContext(hWnd,hIMC);
  440.             // Save hIMC into WndExtra.
  441.             SetWindowLong(hWnd,MYGWL_IMC,(LONG)hIMC);
  443.             MySetCompositionFont(hWnd);
  444.             MySetCompositionForm(hWnd);
  446.             InitStringBuffer(hWnd);
  448.     break;
  450.         case WM_LBUTTONDBLCLK:
  451.             MyChangeFont(hWnd);
  452.     break;
  454.         case WM_LBUTTONDOWN:
  455.             SetFocus(hWnd);
  456.     break;
  458.         case WM_IME_COMPOSITION:
  459.             if (lParam & GCS_RESULTSTR)
  460.             {
  461.                 AddResultString(hWnd);
  462.             }
  463.     return (DefWindowProc(hWnd, message, wParam, lParam));
  464.     break;
  466.         case WM_SIZE:
  467.             switch (wParam)
  468.             {
  469.                 case SIZENORMAL:
  470.                 case SIZEFULLSCREEN:
  471.                     MySetCompositionForm(hWnd);
  472.                     InvalidateRect(hWnd,NULL,TRUE);
  473.                     break;
  475.                 case SIZEICONIC:
  476.             return (DefWindowProc(hWnd, message, wParam, lParam));
  477.                     break;
  478.             }
  479.     break;
  481. case WM_PAINT:
  482.             MyDrawString(hWnd,wParam,lParam);
  483.     break;
  485. case WM_DESTROY:
  486.             hFont = (HFONT)GetWindowLong(hWnd,MYGWL_FONT);
  487.             DeleteObject(hFont);
  489.             hIMC = (HIMC)GetWindowLong(hWnd,MYGWL_IMC);
  490.             ImmDestroyContext(hIMC);
  492.             DestroyStringBuffer(hWnd);
  494.     break;
  496. default:
  497.     return (DefWindowProc(hWnd, message, wParam, lParam));
  498.     }
  499.     return 0L;
  501. }
  503. /**********************************************************************/
  504. /*                                                                    */
  505. /*    OwnUIOwnIMCWndProc(HWND, UINT, WPARAM, LPARAM)                  */
  506. /*                                                                    */
  507. /**********************************************************************/
  508. long FAR PASCAL OwnUIOwnIMCWndProc(hWnd, message, wParam, lParam)
  509. HWND hWnd;
  510. UINT message;
  511. WPARAM wParam;
  512. LPARAM lParam;
  513. {
  514.     HFONT hFont;
  515.     HIMC  hIMC = 0L;
  516.     HWND  hIMEWnd = (HWND)GetWindowLong(hWnd,MYGWL_IMEWND);
  519.     if (IsWindow(hIMEWnd) && ImmIsUIMessage(hIMEWnd,message,wParam,lParam))
  520.     {
  521.         switch (message) 
  522.         {
  523.             case WM_IME_COMPOSITION:
  524.                 if (lParam & GCS_RESULTSTR)
  525.                 {
  526.                     AddResultString(hWnd);
  527.                 }
  528.         break;
  530.             default:
  531.         break;
  532.         }
  534. return 0L;
  535.     }
  537.     switch (message) 
  538.     {
  539. case WM_CREATE:
  540.             hFont = GetDefaultGUIFont();
  541.             SetWindowLong(hWnd,MYGWL_FONT,(LONG)hFont);
  543.             hIMC = ImmCreateContext();
  544.             ImmAssociateContext(hWnd,hIMC);
  546.             // Save hIMC into WndExtra.
  547.             SetWindowLong(hWnd,MYGWL_IMC,(LONG)hIMC);
  549.             if (!(hIMEWnd = CreateWindow("Ime", "",
  550.                     WS_POPUP | WS_DISABLED,
  551.             0,0,0,0,
  552.             hWnd, NULL, hInst, NULL)))
  553.         return -1;
  555.             // Save hIMEWnd into WndExtra.
  556.             SetWindowLong(hWnd,MYGWL_IMEWND,(LONG)hIMEWnd);
  558.             MySetCompositionFont(hWnd);
  559.             MySetCompositionForm(hWnd);
  561.             InitStringBuffer(hWnd);
  563.     break;
  565.         case WM_LBUTTONDBLCLK:
  566.             MyChangeFont(hWnd);
  567.     break;
  569.         case WM_LBUTTONDOWN:
  570.             SetFocus(hWnd);
  571.     break;
  573.         case WM_SIZE:
  574.             switch (wParam)
  575.             {
  576.                 case SIZENORMAL:
  577.                 case SIZEFULLSCREEN:
  578.                     MySetCompositionForm(hWnd);
  579.                     InvalidateRect(hWnd,NULL,TRUE);
  580.                     break;
  582.                 case SIZEICONIC:
  583.             return (DefWindowProc(hWnd, message, wParam, lParam));
  584.                     break;
  585.             }
  586.     break;
  588. case WM_PAINT:
  589.             MyDrawString(hWnd,wParam,lParam);
  590.     break;
  592. case WM_DESTROY:
  593.             hFont = (HFONT)GetWindowLong(hWnd,MYGWL_FONT);
  594.             DeleteObject(hFont);
  596.             hIMC = (HIMC)GetWindowLong(hWnd,MYGWL_IMC);
  597.             ImmDestroyContext(hIMC);
  599.             DestroyStringBuffer(hWnd);
  601.     break;
  603. default:
  604.     return (DefWindowProc(hWnd, message, wParam, lParam));
  605.     }
  606.     return 0L;
  608. }