设为首页收藏本站
切换到窄版

鱼C论坛

 找回密码
 立即注册
鱼C论坛»论坛 › 技术交流 › Windows程序设计 › 请问谁有windows程序设计第34讲的源代码吗
返回列表 发新帖
查看: 2625|回复: 3

[已解决]请问谁有windows程序设计第34讲的源代码吗

[复制链接]
lijialijialijia
发表于 2019-7-17 17:22:57 | 显示全部楼层 |阅读模式

马上注册，结交更多好友，享用更多功能^_^

您需要 登录 才可以下载或查看，没有账号？立即注册

x
课后作业和知识点备忘到键盘消息这就没有了 求各位大哥帮帮忙
最佳答案
月排行榜 / 总排行榜
小甲鱼
2019-7-17 19:29:40
/* -------------------------------------------------------------------
                    MyWindows.c -- 基本窗口模型  
                                《Windows 程序设计（SDK）》视频教程                    
--------------------------------------------------------------------*/

#include <windows.h>
#include <strsafe.h>

LRESULT CALLBACK WndProc(HWND, UINT, WPARAM, LPARAM);

int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, PSTR szCmdLine, int iCmdShow)
{
        static TCHAR szAppName[] = TEXT("MyWindows");
        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_APPLICATION);
        wndclass.hCursor = LoadCursor(NULL, IDC_ARROW);
        wndclass.hbrBackground = (HBRUSH)GetStockObject(WHITE_BRUSH);
        wndclass.lpszMenuName = NULL;
        wndclass.lpszClassName = szAppName;

        if (!RegisterClass(&wndclass))
        {
                MessageBox(NULL, TEXT("这个程序需要在 Windows NT 才能执行！"), szAppName, MB_ICONERROR);
                return 0;
        }

        hwnd = CreateWindow(szAppName, 
                TEXT("鱼C工作室"), 
                WS_OVERLAPPEDWINDOW,
                CW_USEDEFAULT, 
                CW_USEDEFAULT, 
                CW_USEDEFAULT, 
                CW_USEDEFAULT,
                NULL, 
                NULL, 
                hInstance, 
                NULL);
        
        ShowWindow(hwnd, iCmdShow);
        UpdateWindow(hwnd);

        while (GetMessage(&msg, NULL, 0, 0))
        {
                TranslateMessage(&msg);
                DispatchMessage(&msg);
        }

        return msg.wParam;
}

LRESULT CALLBACK WndProc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
{
    static int cxClientMax, cyClientMax, cxClient, cyClient, cxChar, cyChar;
    static int cLinesMax, cLines;
    static PMSG pmsg;
    static RECT rectScroll;
    static TCHAR szTop[] = TEXT("Message        Key       Char     Repeat Scan Ext ALT Prev Tran");
    static TCHAR szUnd[] = TEXT("_______        ___       ____     ______ ____ ___ ___ ____ ____");
    static TCHAR *szFormat[2] = {
        TEXT("%-13s %3d %-15s%c%6u %4d %3s %3s %4s %4s"),
        TEXT("%-13s            0x%04X%1s%c %6u %4d %3s %3s %4s %4s")
    };
    static TCHAR *szYes = TEXT("Yes");
    static TCHAR *szNo = TEXT("No");
    static TCHAR *szDown = TEXT("Down");
    static TCHAR *szUp = TEXT("Up");
    static TCHAR *szMessage[] = {
        TEXT("WM_KEYDOWN"), TEXT("WM_KEYUP"), TEXT("WM_CHAR"), TEXT("WM_DEADCHAR"),
        TEXT("WM_SYSKEYDOWN"), TEXT("WM_SYSKEYUP"), TEXT("WM_SYSCHAR"), TEXT("WM_SYSDEADCHAR")
    };
    HDC hdc;
    int i, iType;
    PAINTSTRUCT ps;
    TCHAR szBuffer[128], szKeyName[32];
    TEXTMETRIC tm;

        switch (message)
        {
    case WM_CREATE:
    case WM_DISPLAYCHANGE:
        // 获取客户区的最大尺寸
        cxClientMax = GetSystemMetrics(SM_CXMAXIMIZED);
        cyClientMax = GetSystemMetrics(SM_CYMAXIMIZED);

        hdc = GetDC(hwnd);

        SelectObject(hdc, GetStockObject(SYSTEM_FIXED_FONT)); // 设置等宽字体
        GetTextMetrics(hdc, &tm);
        cxChar = tm.tmAveCharWidth;
        cyChar = tm.tmHeight;

        ReleaseDC(hwnd, hdc);

        if (pmsg)
        {
            free(pmsg);
        }

        cLinesMax = cyClientMax / cyChar; // 计算客户区一屏最多可以容纳多少行
        pmsg = malloc(cLinesMax * sizeof(MSG)); // 申请足够容纳 cLinesMax 行消息的内存
        cLines = 0;

        // 这里没有 break，没有 return。

    case WM_SIZE:
        if (message == WM_SIZE)
        {
            cxClient = LOWORD(lParam);
            cyClient = HIWORD(lParam);
        }

        // 计算滚动的矩形
        rectScroll.left = 0;
        rectScroll.right = cxClient;
        rectScroll.top = cyChar;
        rectScroll.bottom = cyChar * (cyClient / cyChar);

        InvalidateRect(hwnd, NULL, TRUE);
        return 0;

    case WM_KEYDOWN:
    case WM_KEYUP:
    case WM_CHAR:
    case WM_DEADCHAR:
    case WM_SYSKEYDOWN:
    case WM_SYSKEYUP:
    case WM_SYSCHAR:
    case WM_SYSDEADCHAR:
        // 但凡接收到上述消息，页面向上滚动一行
        for (i = cLinesMax - 1; i > 0; i--)
        {
            pmsg[i] = pmsg[i - 1];
        }
        pmsg[0].hwnd = hwnd;
        pmsg[0].message = message;
        pmsg[0].wParam = wParam;
        pmsg[0].lParam = lParam;

        cLines = min(cLines + 1, cLinesMax);
        ScrollWindow(hwnd, 0, -cyChar, &rectScroll, &rectScroll);

        break;

        case WM_PAINT:
                hdc = BeginPaint(hwnd, &ps);
                
        SelectObject(hdc, GetStockObject(SYSTEM_FIXED_FONT));
        SetBkMode(hdc, TRANSPARENT);
        TextOut(hdc, 0, 0, szTop, lstrlen(szTop));
        TextOut(hdc, 0, 0, szUnd, lstrlen(szUnd));

        for (i = 0; i < min(cLines, cyClient / cyChar - 1); i++)
        {
            iType = pmsg[i].message == WM_CHAR ||
                pmsg[i].message == WM_SYSCHAR ||
                pmsg[i].message == WM_DEADCHAR ||
                pmsg[i].message == WM_SYSDEADCHAR;

            GetKeyNameText(pmsg[i].lParam, szKeyName, sizeof(szKeyName) / sizeof(TCHAR));
            TextOut(hdc, 0, (cyClient / cyChar - 1 - i) * cyChar, szBuffer,
                wsprintf(szBuffer, szFormat[iType],
                szMessage[pmsg[i].message - WM_KEYFIRST], pmsg[i].wParam,
                (PTSTR)(iType ? TEXT(" ") : szKeyName),
                (TCHAR)(iType ? pmsg[i].wParam : ' '),
                LOWORD(pmsg[i].lParam), HIWORD(pmsg[i].lParam) & 0xFF,
                0x01000000 & pmsg[i].lParam ? szYes : szNo,
                0x20000000 & pmsg[i].lParam ? szYes : szNo,
                0x40000000 & pmsg[i].lParam ? szDown : szUp,
                0x80000000 & pmsg[i].lParam ? szUp : szDown));
        }

                EndPaint(hwnd, &ps);
                return 0;

        case WM_DESTROY:
                PostQuitMessage(0);
                return 0;
        }

        return DefWindowProc(hwnd, message, wParam, lParam);
}
想知道小甲鱼最近在做啥？请访问 -> ilovefishc.com
回复

使用道具 举报

人造人
发表于 2019-7-17 19:04:05 | 显示全部楼层
这要怎么帮？帮你召唤小甲鱼吗？
@小甲鱼
^_^
想知道小甲鱼最近在做啥？请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

小甲鱼
发表于 2019-7-17 19:29:40 | 显示全部楼层    本楼为最佳答案   
/* -------------------------------------------------------------------
                    MyWindows.c -- 基本窗口模型  
                                《Windows 程序设计（SDK）》视频教程                    
--------------------------------------------------------------------*/

#include <windows.h>
#include <strsafe.h>

LRESULT CALLBACK WndProc(HWND, UINT, WPARAM, LPARAM);

int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, PSTR szCmdLine, int iCmdShow)
{
        static TCHAR szAppName[] = TEXT("MyWindows");
        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_APPLICATION);
        wndclass.hCursor = LoadCursor(NULL, IDC_ARROW);
        wndclass.hbrBackground = (HBRUSH)GetStockObject(WHITE_BRUSH);
        wndclass.lpszMenuName = NULL;
        wndclass.lpszClassName = szAppName;

        if (!RegisterClass(&wndclass))
        {
                MessageBox(NULL, TEXT("这个程序需要在 Windows NT 才能执行！"), szAppName, MB_ICONERROR);
                return 0;
        }

        hwnd = CreateWindow(szAppName, 
                TEXT("鱼C工作室"), 
                WS_OVERLAPPEDWINDOW,
                CW_USEDEFAULT, 
                CW_USEDEFAULT, 
                CW_USEDEFAULT, 
                CW_USEDEFAULT,
                NULL, 
                NULL, 
                hInstance, 
                NULL);
        
        ShowWindow(hwnd, iCmdShow);
        UpdateWindow(hwnd);

        while (GetMessage(&msg, NULL, 0, 0))
        {
                TranslateMessage(&msg);
                DispatchMessage(&msg);
        }

        return msg.wParam;
}

LRESULT CALLBACK WndProc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
{
    static int cxClientMax, cyClientMax, cxClient, cyClient, cxChar, cyChar;
    static int cLinesMax, cLines;
    static PMSG pmsg;
    static RECT rectScroll;
    static TCHAR szTop[] = TEXT("Message        Key       Char     Repeat Scan Ext ALT Prev Tran");
    static TCHAR szUnd[] = TEXT("_______        ___       ____     ______ ____ ___ ___ ____ ____");
    static TCHAR *szFormat[2] = {
        TEXT("%-13s %3d %-15s%c%6u %4d %3s %3s %4s %4s"),
        TEXT("%-13s            0x%04X%1s%c %6u %4d %3s %3s %4s %4s")
    };
    static TCHAR *szYes = TEXT("Yes");
    static TCHAR *szNo = TEXT("No");
    static TCHAR *szDown = TEXT("Down");
    static TCHAR *szUp = TEXT("Up");
    static TCHAR *szMessage[] = {
        TEXT("WM_KEYDOWN"), TEXT("WM_KEYUP"), TEXT("WM_CHAR"), TEXT("WM_DEADCHAR"),
        TEXT("WM_SYSKEYDOWN"), TEXT("WM_SYSKEYUP"), TEXT("WM_SYSCHAR"), TEXT("WM_SYSDEADCHAR")
    };
    HDC hdc;
    int i, iType;
    PAINTSTRUCT ps;
    TCHAR szBuffer[128], szKeyName[32];
    TEXTMETRIC tm;

        switch (message)
        {
    case WM_CREATE:
    case WM_DISPLAYCHANGE:
        // 获取客户区的最大尺寸
        cxClientMax = GetSystemMetrics(SM_CXMAXIMIZED);
        cyClientMax = GetSystemMetrics(SM_CYMAXIMIZED);

        hdc = GetDC(hwnd);

        SelectObject(hdc, GetStockObject(SYSTEM_FIXED_FONT)); // 设置等宽字体
        GetTextMetrics(hdc, &tm);
        cxChar = tm.tmAveCharWidth;
        cyChar = tm.tmHeight;

        ReleaseDC(hwnd, hdc);

        if (pmsg)
        {
            free(pmsg);
        }

        cLinesMax = cyClientMax / cyChar; // 计算客户区一屏最多可以容纳多少行
        pmsg = malloc(cLinesMax * sizeof(MSG)); // 申请足够容纳 cLinesMax 行消息的内存
        cLines = 0;

        // 这里没有 break，没有 return。

    case WM_SIZE:
        if (message == WM_SIZE)
        {
            cxClient = LOWORD(lParam);
            cyClient = HIWORD(lParam);
        }

        // 计算滚动的矩形
        rectScroll.left = 0;
        rectScroll.right = cxClient;
        rectScroll.top = cyChar;
        rectScroll.bottom = cyChar * (cyClient / cyChar);

        InvalidateRect(hwnd, NULL, TRUE);
        return 0;

    case WM_KEYDOWN:
    case WM_KEYUP:
    case WM_CHAR:
    case WM_DEADCHAR:
    case WM_SYSKEYDOWN:
    case WM_SYSKEYUP:
    case WM_SYSCHAR:
    case WM_SYSDEADCHAR:
        // 但凡接收到上述消息，页面向上滚动一行
        for (i = cLinesMax - 1; i > 0; i--)
        {
            pmsg[i] = pmsg[i - 1];
        }
        pmsg[0].hwnd = hwnd;
        pmsg[0].message = message;
        pmsg[0].wParam = wParam;
        pmsg[0].lParam = lParam;

        cLines = min(cLines + 1, cLinesMax);
        ScrollWindow(hwnd, 0, -cyChar, &rectScroll, &rectScroll);

        break;

        case WM_PAINT:
                hdc = BeginPaint(hwnd, &ps);
                
        SelectObject(hdc, GetStockObject(SYSTEM_FIXED_FONT));
        SetBkMode(hdc, TRANSPARENT);
        TextOut(hdc, 0, 0, szTop, lstrlen(szTop));
        TextOut(hdc, 0, 0, szUnd, lstrlen(szUnd));

        for (i = 0; i < min(cLines, cyClient / cyChar - 1); i++)
        {
            iType = pmsg[i].message == WM_CHAR ||
                pmsg[i].message == WM_SYSCHAR ||
                pmsg[i].message == WM_DEADCHAR ||
                pmsg[i].message == WM_SYSDEADCHAR;

            GetKeyNameText(pmsg[i].lParam, szKeyName, sizeof(szKeyName) / sizeof(TCHAR));
            TextOut(hdc, 0, (cyClient / cyChar - 1 - i) * cyChar, szBuffer,
                wsprintf(szBuffer, szFormat[iType],
                szMessage[pmsg[i].message - WM_KEYFIRST], pmsg[i].wParam,
                (PTSTR)(iType ? TEXT(" ") : szKeyName),
                (TCHAR)(iType ? pmsg[i].wParam : ' '),
                LOWORD(pmsg[i].lParam), HIWORD(pmsg[i].lParam) & 0xFF,
                0x01000000 & pmsg[i].lParam ? szYes : szNo,
                0x20000000 & pmsg[i].lParam ? szYes : szNo,
                0x40000000 & pmsg[i].lParam ? szDown : szUp,
                0x80000000 & pmsg[i].lParam ? szUp : szDown));
        }

                EndPaint(hwnd, &ps);
                return 0;

        case WM_DESTROY:
                PostQuitMessage(0);
                return 0;
        }

        return DefWindowProc(hwnd, message, wParam, lParam);
}
想知道小甲鱼最近在做啥？请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

lijialijialijia
 楼主| 发表于 2019-7-18 16:56:30 | 显示全部楼层
小甲鱼 发表于 2019-7-17 19:29

谢谢大哥 特别感谢
想知道小甲鱼最近在做啥？请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Archiver|鱼C工作室 ( 粤ICP备18085999号-1 | 粤公网安备 44051102000585号)

GMT+8, 2024-12-21 22:16

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

快速回复 返回顶部 返回列表