


下载本文档
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、集美大学计算机工程学院实验报告课程名称:TCP/IP协议分析与编程班级:实验成绩:实验项目名称:Windows API窗口程序设计学号:上机实践日期:2016-03-24实验项目编号:01组号:1上机实践时间: 2学时一、 实验目的运用Windows API进行编程二、实验内容与设计思想在桌面显示Windows窗口。窗口内居中显示“大家好,这是我的第一个Windows API程序!”同时播放背景音乐,并可通过程序改变窗口显示风格为只有标题栏,以及鼠标指针形状为手型。 三、实验使用环境操作系统: Microsoft Windows XP SP2编程环境: Visual C+ 6.0简体中文企业版
2、四、实验步骤和调试过程(要求:给出源码及实验结果截图)源码:#include<windows.h>/定义手型鼠标指针#ifndef IDC_HAND#define IDC_HAND MAKEINTRESOURCE(32649)#endifLRESULT CALLBACK WndProc (HWND, UINT, WPARAM, LPARAM) ;/声明WndProc回调函数/主函数,程序调用的入口int WINAPI WinMain (HINSTANCE hInstance, HINSTANCE hPrevInstance,PSTR szCmdLine, int iCmdShow)
3、 static TCHAR szAppName = TEXT ("HelloWorld!") ; 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_APPLI
4、CATION) ; wndclass.hCursor= LoadCursor (NULL,IDC_HAND) ; wndclass.hbrBackground = (HBRUSH)GetStockObject(WHITE_BRUSH) ; wndclass.lpszMenuName = NULL ; wndclass.lpszClassName = szAppName ; if (!RegisterClass (&wndclass) MessageBox (NULL, TEXT ("This program requires Windows XP!"), szApp
5、Name, MB_ICONERROR) ; return 0 ; hwnd = CreateWindow (szAppName, / window class name TEXT ("对话框"), / window caption WS_OVERLAPPEDWINDOW, / window style CW_USEDEFAULT, / initial x position CW_USEDEFAULT, / initial y position CW_USEDEFAULT, / initial x size CW_USEDEFAULT, / initial y size NU
6、LL, / parent window handle NULL, / window menu handle hInstance, / program instance handle NULL) ; / creation parameters ShowWindow (hwnd, iCmdShow) ;UpdateWindow (hwnd) ; while (GetMessage (&msg, NULL, 0, 0) TranslateMessage (&msg) ; DispatchMessage (&msg) ; return msg.wParam ;/返回长整型的消息
7、处理回调函数LRESULT CALLBACK WndProc (HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam) HDC hdc ; PAINTSTRUCT ps ; RECT rect ; switch (message) case WM_CREATE:PlaySound (TEXT ("C:/hellowin.wav"), NULL, SND_FILENAME | SND_ASYNC) ; return 0 ; case WM_PAINT: hdc = BeginPaint (hwnd, &ps) ;
8、GetClientRect (hwnd, &rect); DrawText (hdc,TEXT("大家好,这是我的第一个Windows API 程序!"),-1, &rect, DT_SINGLELINE | DT_CENTER | DT_VCENTER); EndPaint (hwnd, &ps) ; return 0 ; case WM_DESTROY: PostQuitMessage (0) ; return 0 ; return DefWindowProc (hwnd, message, wParam, lParam) ;实验结果:五、实验小结(必写)1.执行时出现错误由于程序引用了PlaySound函数,应该在库文件加上相应的库 winmm.lib,在工程设置连接工程选项里加上winmm.lib,并将/subsys
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 涂料运输安全代理合同
- 生产运作诊断
- 二零二五年度信息安全人工费用咨询与风险防范合同
- 2024深圳市新鹏职业高级中学工作人员招聘考试及答案
- 2024济宁市兖州区职业中等专业学校工作人员招聘考试及答案
- 2024湖南省茶陵县职业中等专业学校工作人员招聘考试及答案
- 餐饮店铺租房合同
- 管理学讲座直播课件
- 房屋转租合同标准版
- 计算机配件采购协议合同
- 重点流域水环境综合治理项目类型及项目合理造价估算标准表
- 一组超全面的5S可视化标准课件
- 10KV供配电工程施工组织设计方案
- 钢结构施工方案(钢结构-施工方案)
- 《民法典》合同编实务培训课件
- 《产业经济学》课程思政教学案例
- 施工组织设计管理台帐
- 腾冲县西山坝片区控制性详细规划课件
- 闭合导线计算表(带公式)
- 商务礼仪培训52873734(PPT143页)
- (高清正版)T_CAGHP 066—2019危岩落石柔性防护网工程技术规范(试行)
评论
0/150
提交评论