void CDLG041701Dlg::OnPaint()
{
int i, j, w, h;
CPaintDC dc(this);
CBitmap bit;
CDC mendc;
CRect rect;
this->GetWindowRect(&rect);
w = rect.Width();
h = rect.Height();
bit.LoadBitmap(IDB_BITMAP1);
mendc.CreateCompatibleDC(&dc);
mendc.SelectObject(&bit);
for (i = 0; i < 20; i++)
{
for (j = i; j < w; j += 20)
{
dc.BitBlt(j, 0, 1, h, &mendc, j, 0, SRCCOPY);
Sleep(2);
}
}
mendc.DeleteDC();
::DeleteObject(&bit);
}