



下載本文檔
版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請進行舉報或認領(lǐng)
文檔簡介
1、 VisualC+面向?qū)ο笈c可視化程序設(shè)計實驗一:繪圖與文本一、實驗?zāi)康?. 掌握 Windows 應(yīng)用程序的基本結(jié)構(gòu);2. 使用 API 函數(shù)建立窗口、消息循環(huán),編制窗口函數(shù);3. 使用 API 函數(shù)在用戶區(qū)繪圖、輸出文本,理解Windows 的圖形設(shè)備接口。二、實驗內(nèi)容實現(xiàn)給定的繪圖與文本操作。三、程序代碼#include#includeBOOLEAN InitWindowClass(HINSTANCE hInstance,int nCmdShow); LRESULT CALLBACK WndProc(HWND, UINT, WPARAM, LPARAM);intAPIENTRY _tWi
2、nMain(HINSTANCE hInstance,HINSTANCE hPrevInstance,LPTSTRlpCmdLine,intnCmdShow)MSG msg;if(!InitWindowClass(hInstance,nCmdShow)MessageBox(NULL,L窗口創(chuàng)建失?。?,_T(創(chuàng)建窗口 ),NULL); return 1;while (GetMessage(&msg, NULL, 0, 0)TranslateMessage(&msg);DispatchMessage(&msg);return (int) msg.wParam;LRESULTCALLBACKWndP
3、roc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)HDC hDC;PAINTSTRUCT PtStr;HBRUSH hBrush;HPEN hPen;static long nXChar,nCaps,nYChar;short x,y;TEXTMETRIC tm;short LnCount=4;LPCWSTR poem4=L故人西辭黃鶴樓,L煙花三月下?lián)P州,L孤帆遠影碧空盡,L唯見長江天際流;switch(message)case WM_CREATE:hDC=GetDC(hWnd);GetTextMetrics(hDC,&tm);
4、nXChar=tm.tmAveCharWidth;nYChar=tm.tmHeight+tm.tmExternalLeading+nXChar;ReleaseDC(hWnd,hDC);break;case WM_PAINT:hDC = BeginPaint(hWnd, &PtStr);SetMapMode(hDC,MM_ANISOTROPIC);hPen=CreatePen(PS_SOLID,2,RGB(255,0,0);hBrush=(HBRUSH)GetStockObject(GRAY_BRUSH);hBrush=CreateSolidBrush(RGB(255,255,0);Select
5、Object(hDC,hBrush);SelectObject(hDC,hPen);MoveToEx(hDC,100,100,NULL);LineTo(hDC,200,100);MoveToEx(hDC,100,100,NULL);LineTo(hDC,150,200);MoveToEx(hDC,200,100,NULL);LineTo(hDC,150,200);Arc(hDC,110,200,190,280,150,200,150,200);MoveToEx(hDC,150,280,NULL);LineTo(hDC,110,300);MoveToEx(hDC,150,280,NULL);Li
6、neTo(hDC,190,300);MoveToEx(hDC,110,300,NULL);LineTo(hDC,110,325);MoveToEx(hDC,190,300,NULL);LineTo(hDC,190,325);MoveToEx(hDC,110,325,NULL);LineTo(hDC,190,325);RoundRect(hDC,290,160,370,200,20,20);Pie(hDC,290,200,370,280,320,200,340,200);Rectangle(hDC,290,280,370,325);for(x=0;xLnCount;x+)for(y=0;y7;y
7、+)TextOut(hDC,nXChar-(x*4*nXChar)+600,nYChar+nYChar*y+70,poemx+y,1);EndPaint(hWnd,&PtStr);DeleteObject(hPen);DeleteObject(hBrush);break;case WM_DESTROY:PostQuitMessage(0);break;default:return DefWindowProc(hWnd, message, wParam, lParam); break;return 0;BOOLEAN InitWindowClass(HINSTANCE hInstance,int
8、 nCmdShow)WNDCLASSEX wcex;HWND hWnd;TCHAR szWindowClass=L實驗 1;TCHAR szTitle=L2015326602033_周俊 _實驗一 ;wcex.cbSize = sizeof(WNDCLASSEX);wcex.style= 0;wcex.lpfnWndProc= WndProc;wcex.cbClsExtra= 0;wcex.cbWndExtra= 0;wcex.hInstance= hInstance;wcex.hIcon= LoadIcon(hInstance, MAKEINTRESOURCE(IDI_APPLICATION
9、);wcex.hCursor= LoadCursor(NULL, IDC_ARROW);wcex.hbrBackground= (HBRUSH)GetStockObject(WHITE_BRUSH);wcex.lpszMenuName= NULL;wcex.lpszClassName= szWindowClass;wcex.hIconSm=LoadIcon(wcex.hInstance,MAKEINTRESOURCE(IDI_APPLICATION);if(!RegisterClassEx(&wcex)MessageBox(NULL,_T(窗口類注冊失?。?),_T( 窗口注冊 ),NULL); return 1;hWnd = CreateWindow(szWindowClass, szTitle, WS_OVERLAPPEDWINDOW,CW_USEDEFAULT,CW_USEDEFAULT,CW_USEDEFAULT, CW_USEDEFAULT, NULL,NULL, hInstance, NULL);if (!hWnd)return FALSE;ShowWindow(hWnd, nCmdShow);Updat
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫網(wǎng)僅提供信息存儲空間,僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護處理,對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對任何下載內(nèi)容負責。
- 6. 下載文件中如有侵權(quán)或不適當內(nèi)容,請與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準確性、安全性和完整性, 同時也不承擔用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。
最新文檔
- 茂名二模文綜政治試題
- JavaScript Vue.js前端開發(fā)任務(wù)驅(qū)動式教程-課件 仇善梁 模塊1-8 JavaScript知識入門及應(yīng)用 - Vue.js基礎(chǔ)知識及應(yīng)用
- 老年骨科護理課件
- 老年術(shù)后護理課件
- 老年護理案例分析課件
- 出租車司機權(quán)益保障及服務(wù)質(zhì)量提升合同
- 餐飲店加盟與承包合同規(guī)范
- 成品柴油零售連鎖經(jīng)營合同
- 車棚施工安全標準與環(huán)境保護合同
- 老人二便護理課件
- 集裝箱七點檢查表
- 部編初一語文閱讀理解最全答題模板與技巧+專項訓練練習題
- 2023年湖北省高中學業(yè)水平合格性考試數(shù)學試題試卷及答案解析
- 保定一中1+3物理試卷
- 弟子規(guī)注音A4直接打印版
- 金融學原理重點總結(jié)彭興韻
- Cmk設(shè)備能力指數(shù)分析表
- J17J177 鋼絲網(wǎng)架珍珠巖復合保溫外墻板建筑構(gòu)造
- 水泥檢測培訓試題(附答案)
- 譯林版三年級英語上冊《全冊課件》ppt
- 高標準農(nóng)田建設(shè)上圖入庫(技術(shù)培訓)
評論
0/150
提交評論