Bitmap loading (from screen DC to memory DC)

HDC hscrdc, hmemdc; // screen and MEM DC
Hbitmap, holdbitmap; // handle of Bitmap
Int xscrn, yscrn; // the resolution of Screen
Int NX, NY, nx2, ny2;
Int nwidth, nheight;
Nx = rect. Left;
NY = rect. Top;
Nx2 = rect. Right;
Ny2 = rect. bottom;
Hscrdc = createdc ("display", null); // create DC for Screen
Hmemdc = createcompatibledc (hscrdc); // create compatible mem DC for screen DC
Xscrn = getdevicecaps (hscrdc, horzres); // get resolution of Screen
Yscrn = getdevicecaps (hscrdc, vertres );
If (nx <0)
Nx = 0;
If (NY <0)
NY = 0;
If (nx2> xscrn)
Nx2 = xscrn;
If (ny2> yscrn)
Ny2 = yscrn;
Nwidth = nx2-NX;
Nheight = ny2-NY;
// Hbitmap = createcompatiblebitmap (hmemdc, nwidth, nheight );
Hbitmap = createcompatiblebitmap (hscrdc, nwidth, nheight); // create compatible bitmap for screen DC
Holdbitmap = (hbitmap) SelectObject (hmemdc, hbitmap); // select bitmap into the mem DC
Bitblt (hmemdc, 0, 0, nwidth, nheight, hscrdc, NX, NY, srccopy); // copy screen DC to Mem
Hbitmap = (hbitmap) SelectObject (hmemdc, holdbitmap); // get the handle of screen bitmap
Deletedc (hscrdc); // clear
Deletedc (hmemdc );
Deleteobject (holdbitmap );
Return hbitmap; // return the handle of Bitmap