動(dòng)態(tài)創(chuàng)建窗口,并重寫(xiě)窗口過(guò)程-創(chuàng)新互聯(lián)

在窗口過(guò)程中處理滾動(dòng)條消息

成都創(chuàng)新互聯(lián)2013年至今，是專業(yè)互聯(lián)網(wǎng)技術(shù)服務(wù)公司，擁有項(xiàng)目網(wǎng)站設(shè)計(jì)制作、成都網(wǎng)站制作網(wǎng)站策劃，項(xiàng)目實(shí)施與項(xiàng)目整合能力。我們以讓每一個(gè)夢(mèng)想脫穎而出為使命，1280元光山做網(wǎng)站,已為上家服務(wù),為光山各地企業(yè)和個(gè)人服務(wù),聯(lián)系電話:028-86922220

WNDPROC pSubclassOldEditProc;
INT iVScrollPos = 0, iVTextPos = 0;

LRESULT winProc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
{
	//獲取新設(shè)置的窗口屬性,就是獲取CNewEdit的指針,方便后面訪問(wèn)m_lOldProc這個(gè)成員
	if (message == WM_VSCROLL)
	{
		//TRACE( _T("%d\n"), LOWORD(wParam));
		switch (LOWORD(wParam))
		{
			case SB_LINEDOWN:
				if (iVScrollPos != (NUMLINE - 1)) 
					iVTextPos -= 1;
				TRACE(_T("向下滾動(dòng)一行\(zhòng)n") );
				break;
			case SB_LINEUP:
				if (iVScrollPos != 0) iVTextPos += 1;
				TRACE( _T("向上滾動(dòng)一行\(zhòng)n"));
				break;
			case SB_PAGEUP:
				TRACE( _T("向上滾動(dòng)一頁(yè)\n"));
				break;
			case SB_PAGEDOWN:
				TRACE( _T("向下滾動(dòng)一頁(yè)\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);
	}
	//處理完需要截獲(改變)的消息后接著返回舊的窗口過(guò)程
	return CallWindowProc((WNDPROC)pSubclassOldEditProc, hwnd, 
	       message, wParam, lParam);
}

創(chuàng)建窗口并替換過(guò)程函數(shù),如下

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;

//設(shè)置滾動(dòng)條
m_hwndListbox = m_pWndListBoxDlg->GetSafeHwnd();
m_pWndListBoxDlg->SetScrollRange(SB_VERT, 0, NUMLINE - 1, FALSE);
//設(shè)置 TRUE 滾動(dòng)條立即重繪 這樣才能看到新位置  
m_pWndListBoxDlg->SetScrollPos(SB_VERT, 0, TRUE);
//更換窗口過(guò)程
pSubclassOldEditProc = (WNDPROC)::SetWindowLong(
      m_pWndListBoxDlg->GetSafeHwnd(), 
      GWL_WNDPROC,(DWORD)winProc);

另外有需要云服務(wù)器可以了解下創(chuàng)新互聯(lián)scvps.cn，海內(nèi)外云服務(wù)器15元起步，三天無(wú)理由+7*72小時(shí)售后在線，公司持有idc許可證，提供“云服務(wù)器、裸金屬服務(wù)器、高防服務(wù)器、香港服務(wù)器、美國(guó)服務(wù)器、虛擬主機(jī)、免備案服務(wù)器”等云主機(jī)租用服務(wù)以及企業(yè)上云的綜合解決方案，具有“安全穩(wěn)定、簡(jiǎn)單易用、服務(wù)可用性高、性價(jià)比高”等特點(diǎn)與優(yōu)勢(shì)，專為企業(yè)上云打造定制，能夠滿足用戶豐富、多元化的應(yīng)用場(chǎng)景需求。

新聞名稱：動(dòng)態(tài)創(chuàng)建窗口,并重寫(xiě)窗口過(guò)程-創(chuàng)新互聯(lián)
文章出自：http://m.jiaotiyi.com/article/hchss.html