Windows API窗口画线程序

1、集美大学计算机工程学院实验报告课程名称：TCP/IP协议与通信程序设计班级：实验成绩：实验项目名称：Windows API窗口画线程序设计学号：上机实践日期：2016-04-07实验项目编号：03组号：1上机实践时间： 2学时一、 实验目的理解并熟悉Windows程序消息映射的思想，熟练掌握运用Win32 API技术进行编程的方法。为Windows通信程序打下坚实的基础。二、实验内容与设计思想设计一个简单的Win32程序，该程序窗口内正上方居中显示“Windows API画线程序演示”字样，在程序窗口内任意位置按下鼠标左键并拖动到窗口范围内任意位置，松开鼠标左键即可绘制一条蓝色的直线。三、实验

2、使用环境操作系统： Microsoft Windows XP SP2编程环境： Visual C+ 6.0中文企业版四、实验步骤和调试过程详细给出源码以及实现的效果图，并配有代码解释源码：#include LRESULT CALLBACK WndProc (HWND, UINT, WPARAM, LPARAM);int WINAPI WinMain (HINSTANCE hInstance, HINSTANCE hPrevInstance, PSTR szCmdLine, int iCmdShow) TCHAR SoftName=TEXT(划线程序); HWND hwnd ; MSG msg

3、; WNDCLASS wndclass ; wndclass.style = CS_HREDRAW | CS_VREDRAW ; wndclass.lpfnWndProc = WndProc ; wndclass.cbClsExtra = 0 ; wndclass.cbWndExtra = 0 ; wndclass.hInstance = hInstance ; wndclass.hIcon = LoadIcon (hInstance, SoftName) ; wndclass.hCursor = LoadCursor (NULL, IDC_ARROW) ; wndclass.hbrBackg

4、round = (HBRUSH) GetStockObject (WHITE_BRUSH) ; wndclass.lpszMenuName = NULL ; wndclass.lpszClassName = SoftName ; if (!RegisterClass (&wndclass) MessageBox (NULL, TEXT (This program requires Windows NT!), SoftName, MB_ICONERROR) ; return 0 ; hwnd = CreateWindow (SoftName, SoftName, WS_OVERLAPPEDWIN

5、DOW, GetSystemMetrics (SM_CXSCREEN) / 4, GetSystemMetrics (SM_CYSCREEN) / 4, GetSystemMetrics (SM_CXSCREEN) / 2, GetSystemMetrics (SM_CYSCREEN) / 2, NULL, NULL, hInstance, NULL) ; ShowWindow (hwnd, iCmdShow) ; UpdateWindow (hwnd) ; while (GetMessage (&msg, NULL, 0, 0) TranslateMessage (&msg) ; Dispa

6、tchMessage (&msg) ; return msg.wParam ;LRESULT CALLBACK WndProc (HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)static POINT pt2;/定义存放结构体类型的点的坐标PAINTSTRUCT ps;/定义指向包含绘图信息的结构体变量HDC hdc;/定义指向设备的句柄HPEN hPen;/定义指向画笔的句柄RECT rect ;/定义指向矩形区域的结构体变量 switch(message) case WM_CREATE:return 0;case WM_LBUT

7、TONDOWN:/鼠标点击左键后获取该点的坐标病放到POINT结构体内pt0.x=LOWORD(lParam);pt0.y=HIWORD(lParam);return 0;case WM_MOUSEMOVE:/按下了左键就获取点的坐标并放到结构体内，只要没按下键或按得不是左键俊不获取坐标if(wParam & MK_LBUTTON)pt1.x=LOWORD(lParam);pt1.y=HIWORD(lParam);InvalidateRect(hwnd,NULL,TRUE);/窗体重新绘制（用于下一个WM_PAINT消息到来时）return 0;case WM_PAINT:/处理绘图消息 hd

8、c=BeginPaint(hwnd,&ps);/开始窗口绘制 GetClientRect (hwnd, &rect); /获取窗口客户区的尺寸 DrawText (hdc,TEXT(Windows API画线程序演示!),-1, &rect, DT_SINGLELINE | DT_CENTER) ; /显示文本串 hPen=CreatePen(PS_SOLID,2,RGB(0,0,255);/创建画笔，样式为实线，宽度为2.颜色为蓝色 SelectObject(hdc,hPen);/选择画笔MoveToEx(hdc,pt0.x,pt0.y,0);/移到刚才存放的鼠标左键按下的坐标点LineTo(hdc,pt1.x,pt1.y);/从当前坐标连线到pt1坐标所在位置即划成一条直线EndPaint(hwnd,&ps);/释放设备环境句柄，结束窗口绘制return 0