VC实现屏幕变暗效果

核心提示：网络上有很多利用VB编程实现屏幕变暗的效果（像关闭Win95时的效果），我用VC改写了一下，VC实现屏幕变暗效果，权利属于原文作者！正文HDC hdc;//屏幕的宽度个高度int SCRWidth,SCRHeight;if(m_Bool){BYTE bybits[] = {0x55, 0x0, 0xAA, 0x0,0x

网络上有很多利用VB编程实现屏幕变暗的效果（像关闭Win95时的效果），我用VC改写了一下，权利属于原文作者！

正文

HDC hdc;

　　　　//屏幕的宽度个高度
　　int SCRWidth,SCRHeight;
　　if(m_Bool)
　　{
　　BYTE bybits[] = {0x55, 0x0, 0xAA, 0x0,
　　　　　　　　　　0x55, 0x0, 0xAA, 0x0,
　　　　　　　　　　0x55, 0x0, 0xAA, 0x0,
　　　　　　　　　　0x55, 0x0, 0xAA, 0x0};
　　hBitmap = ::CreateBitmap(8, 8, 1, 1, bybits);
　　hBrush = ::CreatePatternBrush(hBitmap);
　　hdc = ::GetDC(NULL);
　　SCRWidth = ::GetSystemMetrics(SM_CXSCREEN);
　　SCRHeight = ::GetSystemMetrics(SM_CYSCREEN);
　　::SelectObject(hdc,hBrush);
　　//0xA000C9
　　::PatBlt(hdc,0,0,SCRWidth,SCRHeight,0xA000C9);
　　::DeleteObject(hBrush);
　　::ReleaseDC(0, hdc);
　　}
　　else
　　　　　　//重画整个屏幕
　　　　::InvalidateRect(NULL, 0, 1);