case WM_PAINT:
{
hdc = BeginPaint (hwnd, &paintstruct);
// BitBlt (hdc, 0, 0, SIZE_H_WIN, SIZE_V_WIN, memdc, 0, 0, SRCCOPY);

HBRUSH brush = ::CreateSolidBrush ( RGB(255,0,0) );// RED BRUSH

::SelectObject (hdc, brush);
::PatBlt (hdc,0,0,sizex,sizey,PATCOPY);

EndPaint (hwnd, &paintstruct);

::DeleteObject (brush);
}
break;