扫二维码与项目经理沟通
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
在窗口过程中处理滚动条消息
成都创新互联2013年至今,是专业互联网技术服务公司,拥有项目网站设计制作、成都网站制作网站策划,项目实施与项目整合能力。我们以让每一个梦想脱颖而出为使命,1280元光山做网站,已为上家服务,为光山各地企业和个人服务,联系电话:028-86922220WNDPROC pSubclassOldEditProc; INT iVScrollPos = 0, iVTextPos = 0; LRESULT winProc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam) { //获取新设置的窗口属性,就是获取CNewEdit的指针,方便后面访问m_lOldProc这个成员 if (message == WM_VSCROLL) { //TRACE( _T("%d\n"), LOWORD(wParam)); switch (LOWORD(wParam)) { case SB_LINEDOWN: if (iVScrollPos != (NUMLINE - 1)) iVTextPos -= 1; TRACE(_T("向下滚动一行\n") ); break; case SB_LINEUP: if (iVScrollPos != 0) iVTextPos += 1; TRACE( _T("向上滚动一行\n")); break; case SB_PAGEUP: TRACE( _T("向上滚动一页\n")); break; case SB_PAGEDOWN: TRACE( _T("向下滚动一页\n")); break; case SB_THUMBPOSITION: CScale3DCListBox::AdjustListBox(iVScrollPos); break; case SB_THUMBTRACK: iVTextPos = -HIWORD(wParam); break; default: break; } iVScrollPos = -iVTextPos; SetScrollPos(hwnd, SB_VERT, iVScrollPos, TRUE); } //处理完需要截获(改变)的消息后接着返回旧的窗口过程 return CallWindowProc((WNDPROC)pSubclassOldEditProc, hwnd, message, wParam, lParam); }
创建窗口并替换过程函数,如下
m_pWndListBoxDlg = new CWnd; LPCTSTR lpszClassName = AfxRegisterWndClass(CS_HREDRAW | CS_VREDRAW, AfxGetApp()->LoadStandardCursor(IDC_ARROW), (HBRUSH)GetStockObject(LTGRAY_BRUSH), NULL); m_pWndListBoxDlg->Create(lpszClassName, _T(""), WS_CHILD | WS_VISIBLE| WS_VSCROLL| ES_AUTOHSCROLL, rt1, parentWnd, 5234); m_uID = 5234; m_nHeight = nHeight; //设置滚动条 m_hwndListbox = m_pWndListBoxDlg->GetSafeHwnd(); m_pWndListBoxDlg->SetScrollRange(SB_VERT, 0, NUMLINE - 1, FALSE); //设置 TRUE 滚动条立即重绘 这样才能看到新位置 m_pWndListBoxDlg->SetScrollPos(SB_VERT, 0, TRUE); //更换窗口过程 pSubclassOldEditProc = (WNDPROC)::SetWindowLong( m_pWndListBoxDlg->GetSafeHwnd(), GWL_WNDPROC,(DWORD)winProc);
另外有需要云服务器可以了解下创新互联scvps.cn,海内外云服务器15元起步,三天无理由+7*72小时售后在线,公司持有idc许可证,提供“云服务器、裸金属服务器、高防服务器、香港服务器、美国服务器、虚拟主机、免备案服务器”等云主机租用服务以及企业上云的综合解决方案,具有“安全稳定、简单易用、服务可用性高、性价比高”等特点与优势,专为企业上云打造定制,能够满足用户丰富、多元化的应用场景需求。
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流