CScrollView 仅滚动浏览大区域的一部分

CScrollView only scrolls through parts of a large area

本文关键字：区域 一部分 浏览 滚动 CScrollView      更新时间：2023-10-16

我在CScrollView中滚动大面积区域时遇到问题。当滚动条从上到下缓慢移动时，行为如下：起初滚动工作正常。在某些时候，进一步滚动不会执行任何操作，而是显示该区域的顶部。在某些时候，滚动再次从顶部开始。

这里有一个小例子。我使用文档-视图-模型创建了一个新的 MFC 项目，并使用 CScrollView 作为视图类。我添加了以下代码来创建大区域并添加一些文本来显示，当前显示的是哪个部分：

void CScrollViewTest2View::OnInitialUpdate()
{
    CScrollView::OnInitialUpdate();
    CSize sizeTotal;
    // TODO: calculate the total size of this view
    sizeTotal.cx = sizeTotal.cy = 100*1000;
    SetScrollSizes(MM_TEXT, sizeTotal);
    for(int i = 0; i < 1000; i++)
    {
        CStatic* label = new CStatic();
        label->Create(NULL, WS_CHILD | WS_VISIBLE, CRect(10,10 + i*100,100,30 + i*100), this);
        CString text;
        text.Format(L"%d",i);
        label->SetWindowText(text);
    }
}

如果我添加以下代码，我看到在滚动过程中"nPos"值似乎环绕。这可以解释这种行为。但我不知道如何解决这个问题。

BOOL CScrollViewTest2View::OnScroll(UINT nScrollCode, UINT nPos, BOOL bDoScroll )
{
    CString msg;
    msg.Format(L"nPos = %un",nPos);
    TRACE(msg);
    return CScrollView::OnScroll(nScrollCode, nPos, bDoScroll);
}

这是停止滚动时的输出：

nPos = 27826
nPos = 29190
nPos = 30281
nPos = 31372
nPos = 31645
nPos = 32464
nPos = 4294938588
nPos = 4294939134
nPos = 4294939407
nPos = 4294939680
nPos = 4294940225
nPos = 4294940771

那么有没有办法使用 CScrollView 完全向下滚动大面积区域呢？

可以在此处找到示例项目的代码。

静态控件未放置在预期位置。若要查看问题，请运行以下代码：

static CStatic test;
CRect r(0, 0, 100, 30);
r.MoveToY(40000);
test.Create(0, WS_CHILD | WS_VISIBLE, r, this);
test.GetWindowRect(r);
TRACE("%dn", r.top);

r.top应该是32767.这是因为 Windows 中的 16 位限制。x/y 位置超过此限制的所有控件都将被推回此位置。

OnScroll函数也存在类似的问题，但是这可以通过使用GetScrollInfo

将ON_WM_VSCROLL添加到消息映射，并将以下OnVScroll覆盖添加到您的类中

void CScrollViewTest2View::OnVScroll(UINT nSBCode, UINT nPos, CScrollBar* pScrollBar)
{
    CView::OnVScroll(nSBCode, nPos, pScrollBar);
    SCROLLINFO info;
    GetScrollInfo(SB_VERT, &info, SIF_ALL);
    int pos = info.nPos;
    int save = pos;
    switch (nSBCode)
    {
    case SB_LEFT: pos = info.nMin; break;
    case SB_RIGHT: pos = info.nMax; break;
    case SB_LINELEFT: pos--; break;
    case SB_LINERIGHT: pos++;  break;
    case SB_PAGELEFT: pos -= info.nPage; break;
    case SB_PAGERIGHT: pos += info.nPage; break;
    case SB_THUMBPOSITION: pos = info.nTrackPos; break;
    case SB_THUMBTRACK: pos = info.nTrackPos; break;
    }
    //make sure the new position is within range
    if (pos < info.nMin) pos = info.nMin;
    int max = info.nMax - info.nPage + 1;
    if (pos > max) pos = max;
    OnScrollBy(CSize(0, pos - save), 1);
    //EDIT: moved this line after OnScrollBy and added condition
    if (info.nPos != pos)
    {
        info.nPos = pos;
        SetScrollInfo(SB_VERT, &info, FALSE);
    }
    UpdateWindow();
}

这不会解决 x/y 位置大于 32,000 的窗口控件的问题，但至少它会按预期滚动 DC。

为了进行测试，请删除静态控件。您可以使用下面的绘制函数来测试绘画：

void CScrollViewTest2View::OnInitialUpdate()
{
    CScrollView::OnInitialUpdate();
    CSize sizeTotal(0, 100 * 1000);
    SetScrollSizes(MM_TEXT, sizeTotal);
}
void CScrollViewTest2View::OnDraw(CDC* pDC)
{
    for (int i = 0; i < 1000; i++)
    {
        int y = i * 100;
        CString s;
        s.Format(L"%d                ", y);
        pDC->TextOutW(200, y, s);
    }
}
相关文章：