可視化2.doc

南京信息工程大學(xué) 實(shí)驗(yàn)（實(shí)習(xí)）報告實(shí)驗(yàn)（實(shí)習(xí)）名稱 基于鍵盤與鼠標(biāo)應(yīng)用的程序設(shè)計(jì) 實(shí)驗(yàn)（實(shí)習(xí)）日期 一、實(shí)驗(yàn)?zāi)康?掌握鍵盤與鼠標(biāo)在應(yīng)用程序中的消息響應(yīng)機(jī)制。二、實(shí)驗(yàn)內(nèi)容及步驟 實(shí)驗(yàn)任務(wù)1.熟悉鍵盤的消息響應(yīng)；2.熟悉鼠標(biāo)的消息響應(yīng)； 實(shí)驗(yàn)內(nèi)容 設(shè)計(jì)一個窗口，再該窗口中練習(xí)鍵盤的響應(yīng)，要求如下：(1)單機(jī)鍵盤上的向上箭頭時，窗口中顯示“You had hitted the up key”;(2)單擊Shift鍵時，窗口中顯示“You had hitted the Shift key”；(3)單擊Ctrl鍵時，窗口中顯示“You had hitted the Ctrl key”；(4)單擊Ctrl+A鍵時，窗口中顯示“You had hitted the Ctrl A key”；(5)單擊Shift+B鍵時，窗口中顯示“You had hitted the Shift B key”；程序代碼：#include#include#include#includelong WINAPI WndProc(HWND hWnd,UINT iMessage,UINT wParam,LONG lParam);BOOL InitWindowsClass(HINSTANCE hInstance);BOOL InitWindows(HINSTANCE hInstance,int nCmdShow);HWND hWndMain;int WINAPI WinMain(HINSTANCE hInstance,HINSTANCE hPrevInstance,LPSTR lpCmdLine, int nCmdShow)MSG Message;if(!InitWindowsClass(hInstance) return FALSE;if(!InitWindows(hInstance,nCmdShow)return FALSE;while(GetMessage(&Message,0,0,0)/消息循環(huán)TranslateMessage(&Message);DispatchMessage(&Message);return Message.wParam;long WINAPI WndProc(HWND hWnd,UINT iMessage,UINT wParam,LONG lParam)HDC hDC; /定義指向設(shè)備上下文的句柄PAINTSTRUCT ps; /定義指向包含繪圖信息的結(jié)構(gòu)體變量 HPEN hPen;/定義畫筆句柄HBRUSH hBrush;/定義畫刷句柄 /以下定義輸出的字符串static char cUp=You had hitted the UP key;static char cCtrl=You had hitted the Ctrl key;static char cShift=You had hitted the SHIFT key;static char cCtrl_A=You had hitted the CTRL A key;static char cShift_B=You had hitted the SHIFT B key;/下面定義并初始化按鍵標(biāo)志變量static BOOL nUpKeyDown=FALSE,nShiftKeyDown=FALSE, nCtrlKeyDown=FALSE,nCtrlAKeyDown=FALSE, nShiftBKeyDown=FALSE; switch(iMessage) case WM_KEYDOWN:switch(wParam) case VK_UP:/當(dāng)按上箭頭鍵時，變量置為真nUpKeyDown = TRUE; break;case VK_SHIFT:/當(dāng)按Shift鍵時，變量置為真nShiftKeyDown = TRUE; break;case VK_CONTROL:/當(dāng)按Control鍵時，變量置為真nCtrlKeyDown = TRUE; break;default: break;break;case WM_KEYUP:InvalidateRect(hWnd,NULL,FALSE);break;case WM_CHAR:if(wParam=(65&VK_CONTROL) if(nCtrlKeyDown = TRUE)nCtrlAKeyDown = TRUE;nCtrlKeyDown = FALSE;else if(wParam=98|wParam=66)/當(dāng)按下b鍵時if(nShiftKeyDown = TRUE)/檢查Shift鍵是否處于按下狀態(tài)。nShiftBKeyDown = TRUE;/當(dāng)Shift鍵按下時，變量置為真nShiftKeyDown = FALSE;break;case WM_PAINT:/處理繪圖消息.hDC=BeginPaint(hWnd,&ps);hBrush = (HBRUSH)GetStockObject(WHITE_BRUSH);/創(chuàng)建 白畫刷。hPen = (HPEN)GetStockObject(WHITE_PEN);/創(chuàng)建白畫筆。SelectObject(hDC,hPen);/選入白畫刷SelectObject(hDC,hBrush);/選入白畫筆SetTextColor(hDC,RGB(255,0,0);/設(shè)置字體顏色為紅色。/輸出信息。if(nUpKeyDown = TRUE) Rectangle(hDC,0,0,300,200);TextOut(hDC,0,0,cUp,strlen(cUp);nUpKeyDown = FALSE; else if(nCtrlAKeyDown = TRUE) Rectangle(hDC,0,0,300,200);TextOut(hDC,0,100,cCtrl_A,strlen(cCtrl_A);nCtrlAKeyDown = FALSE;nCtrlKeyDown = FALSE;else if(nCtrlKeyDown = TRUE&nCtrlAKeyDown = FALSE)Rectangle(hDC,0,0,300,200);TextOut(hDC,0,60,cCtrl,strlen(cCtrl);nCtrlKeyDown = FALSE;else if(nShiftBKeyDown = TRUE) Rectangle(hDC,0,0,300,200);TextOut(hDC,0,0,cShift_B,strlen(cShift_B);nShiftBKeyDown = FALSE;nShiftKeyDown = FALSE;else if(nShiftBKeyDown = FALSE&nShiftKeyDown = TRUE)Rectangle(hDC,0,0,300,200);TextOut(hDC,0,0,cShift,strlen(cShift);nShiftKeyDown = FALSE;else /刪除畫筆和畫刷 printf(Input Error !n); break;DeleteObject(hPen);DeleteObject(hBrush);EndPaint(hWnd,&ps); break;case WM_DESTROY:PostQuitMessage(0);return 0;default:return(DefWindowProc(hWnd,iMessage,wParam,lParam);return 0;BOOL InitWindows(HINSTANCE hInstance,int nCmdShow) HWND hWnd;hWnd=CreateWindow(6_3, 鍵盤實(shí)例程序, WS_OVERLAPPEDWINDOW, CW_USEDEFAULT, 0, CW_USEDEFAULT, 0, NULL, NULL, hInstance, NULL);if(!hWnd)return FALSE;hWndMain=hWnd;ShowWindow(hWnd,nCmdShow);UpdateWindow(hWnd);return TRUE;BOOL InitWindowsClass(HINSTANCE hInstance)WNDCLASS WndClass; WndClass.cbClsExtra=0;WndClass.cbWndExtra=0; WndClass.hbrBackground=(HBRUSH)(GetStockObject(WHITE_BRUSH); WndClass.hCursor=LoadCursor(NULL,IDC_ARROW); WndClass.hIcon=LoadIcon(NULL,END); WndClass.hInstance=hInstance; WndClass.lpfnWndProc=WndProc; WndClass.lpszClassNa