鱼C论坛

 找回密码
 立即注册
查看: 2285|回复: 5

滚动条

[复制链接]
发表于 2020-1-18 10:33:19 | 显示全部楼层 |阅读模式

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

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

x
为什么下面代码不行呀:
  1. /* -------------------------------------------------------------------
  2.                                         MyWindows.c -- 基本窗口模型
  3.                                 《Windows 程序设计(SDK)》视频教程
  4. --------------------------------------------------------------------*/

  5. #include <windows.h>
  6. #include "strsafe.h"
  7. #include "sysmets.h"

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

  9. int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, PSTR szCmdLine, int iCmdShow)
  10. {
  11.         static TCHAR szAppName[] = TEXT("MyWindows");
  12.         HWND hwnd;
  13.         MSG msg;
  14.         WNDCLASS wndclass;

  15.         wndclass.style = CS_HREDRAW | CS_VREDRAW;
  16.         wndclass.lpfnWndProc = WndProc;
  17.         wndclass.cbClsExtra = 0;
  18.         wndclass.cbWndExtra = 0;
  19.         wndclass.hInstance = hInstance;
  20.         wndclass.hIcon = LoadIcon(NULL, IDI_APPLICATION);
  21.         wndclass.hCursor = LoadCursor(NULL, IDC_ARROW);
  22.         wndclass.hbrBackground = (HBRUSH)GetStockObject(WHITE_BRUSH);
  23.         wndclass.lpszMenuName = NULL;
  24.         wndclass.lpszClassName = szAppName;

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

  30.         hwnd = CreateWindow(szAppName,
  31.                 TEXT("鱼C工作室"),
  32.                 WS_OVERLAPPEDWINDOW | WS_VSCROLL,
  33.                 CW_USEDEFAULT,
  34.                 CW_USEDEFAULT,
  35.                 CW_USEDEFAULT,
  36.                 CW_USEDEFAULT,
  37.                 NULL,
  38.                 NULL,
  39.                 hInstance,
  40.                 NULL);

  41.         ShowWindow(hwnd, iCmdShow);
  42.         UpdateWindow(hwnd);

  43.         while (GetMessage(&msg, NULL, 0, 0))
  44.         {
  45.                 TranslateMessage(&msg);
  46.                 DispatchMessage(&msg);
  47.         }

  48.         return msg.wParam;
  49. }

  50. LRESULT CALLBACK WndProc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
  51. {
  52.         HDC hdc;
  53.         PAINTSTRUCT ps;
  54.         TEXTMETRIC tm;
  55.         TCHAR szBuffer[10];
  56.         static int cxChar, cxCaps, cyChar, cxClient, cyClient, iVscrollPos;
  57.         size_t iTarget;
  58.         int i, y, FirstLine, LastLine;
  59.         SCROLLINFO si;

  60.         switch (message)
  61.         {
  62.         case WM_CREATE:
  63.                 hdc = GetDC(hwnd);

  64.                 GetTextMetrics(hdc, &tm);
  65.                 cxChar = tm.tmAveCharWidth;
  66.                 cxCaps = (tm.tmPitchAndFamily & 1 ? 3 : 2) * cxChar / 2;
  67.                 cyChar = tm.tmHeight + tm.tmExternalLeading;

  68.                 ReleaseDC(hwnd, hdc);

  69.                 return 0;

  70.         case WM_PAINT:
  71.                 hdc = BeginPaint(hwnd, &ps);

  72.                 // 获取滚动条的位置
  73.                 si.cbSize = sizeof(si);
  74.                 si.fMask = SIF_POS;
  75.                 GetScrollInfo(hwnd, SB_VERT, &si);
  76.                 iVscrollPos = si.nPos;

  77.                 // 计算需要重绘的区域
  78.                 FirstLine = max(0, iVscrollPos + ps.rcPaint.top / cyChar);
  79.                 LastLine = min(NUMLINES - 1, iVscrollPos + ps.rcPaint.bottom / cyChar);

  80.                 for (i = FirstLine; i < LastLine; i++)
  81.                 {
  82.                         y = cyChar * (i - iVscrollPos);

  83.                         StringCchLength(sysmetrics[i].szLabel, 1024, &iTarget);
  84.                         TextOut(hdc, 0, y, sysmetrics[i].szLabel, iTarget);

  85.                         StringCchLength(sysmetrics[i].szDesc, 1024, &iTarget);
  86.                         TextOut(hdc, 22 * cxCaps, y, sysmetrics[i].szDesc, iTarget);

  87.                         SetTextAlign(hdc, TA_RIGHT | TA_TOP);
  88.                         StringCchPrintf(szBuffer, 10, TEXT("%5d"), GetSystemMetrics(sysmetrics[i].iIndex));
  89.                         StringCchLength(szBuffer, 10, &iTarget);
  90.                         TextOut(hdc, 22 * cxCaps + 40 * cxChar, y, szBuffer, iTarget);

  91.                         SetTextAlign(hdc, TA_LEFT | TA_TOP);
  92.                 }

  93.                 EndPaint(hwnd, &ps);
  94.                 return 0;

  95.         case WM_SIZE:
  96.                 // 获得客户区的尺寸
  97.                 cyClient = HIWORD(lParam);
  98.                 cxClient = LOWORD(lParam);

  99.                 // 设置垂直滚动条范围和页面大小(设置页面大小将决定滑块的粗细)
  100.                 si.cbSize = sizeof(si);
  101.                 si.fMask = SIF_RANGE | SIF_PAGE;
  102.                 si.nMin = 0;
  103.                 si.nMax = NUMLINES - 1;
  104.                 si.nPage = cyClient / cyChar;
  105.                 SetScrollInfo(hwnd, SB_VERT, &si, TRUE);

  106.         case WM_VSCROLL:
  107.                 // 获得垂直滚动条的所有信息
  108.                 si.cbSize = sizeof(si);
  109.                 si.fMask = SIF_ALL;
  110.                 GetScrollInfo(hwnd, SB_VERT, &si);

  111.                 // 保存当前滑块位置,迟些进行比较
  112.                 iVscrollPos = si.nPos;
  113.                 switch (LOWORD(wParam))
  114.                 {
  115.                         // 用户点击键盘 Home 按键
  116.                 case SB_TOP:
  117.                         si.nPos = si.nMin;
  118.                         break;

  119.                         // 用户点击键盘 End 按键
  120.                 case SB_BOTTOM:
  121.                         si.nPos = si.nMax;
  122.                         break;

  123.                         // 用户点击滚动条上边的三角形
  124.                 case SB_LINEUP:
  125.                         si.nPos -= 1;
  126.                         break;

  127.                         // 用户点击滚动条下边的三角形
  128.                 case SB_LINEDOWN:
  129.                         si.nPos += 1;
  130.                         break;

  131.                         // 用户点击滑块上边的滚动条轴
  132.                 case SB_PAGEUP:
  133.                         si.nPos -= si.nPage;
  134.                         break;

  135.                         // 用户点击滑块下边的滚动条轴
  136.                 case SB_PAGEDOWN:
  137.                         si.nPos += si.nPage;
  138.                         break;

  139.                         // 用户拖动滚动条
  140.                 case SB_THUMBTRACK:
  141.                         si.nPos = si.nTrackPos;
  142.                         break;
  143.                 }

  144.                 // 设置滚动条滑块的新位置
  145.                 si.fMask = SIF_POS;
  146.                 SetScrollInfo(hwnd, SB_VERT, &si, TRUE);

  147.                 // 获得滚动条滑块的位置,由于窗口调整,它可能不是同一个值
  148.                 GetScrollInfo(hwnd, SB_VERT, &si);

  149.                 // 与此前的保存的值进行比较,如果不同则滚动窗口
  150.                 if (si.nPos != iVscrollPos)
  151.                 {
  152.                         ScrollWindow(hwnd, 0, cyChar * (iVscrollPos - si.nPos), NULL, NULL);
  153.                         UpdateWindow(hwnd);
  154.                 }

  155.                 return 0;

  156.         case WM_DESTROY:
  157.                 PostQuitMessage(0);
  158.                 return 0;
  159.         }

  160.         return DefWindowProc(hwnd, message, wParam, lParam);
  161. }
复制代码

问题1、如下图:
Screenshot_1.png 为什么这些文字没有都画出来??


问题2、我调整窗口的宽度,滚动条还是会往上一行,
这该怎么解决?
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复

使用道具 举报

发表于 2020-2-4 16:50:23 | 显示全部楼层
试了一下你的代码,貌似没有问题啊
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

 楼主| 发表于 2020-2-23 18:11:43 | 显示全部楼层
qiuyouzhi 发表于 2020-2-4 16:50
试了一下你的代码,貌似没有问题啊

我觉得你得编译器有问题......
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

发表于 2020-2-23 18:13:36 | 显示全部楼层
lixiangyv 发表于 2020-2-23 18:11
我觉得你得编译器有问题......

VS2013???
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

 楼主| 发表于 2020-3-5 15:32:42 | 显示全部楼层
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

发表于 2020-10-30 21:45:13 From FishC Mobile | 显示全部楼层
将你的firstline括号内最后面-1
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

GMT+8, 2024-4-27 07:26

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

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