![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to blowup.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [OS/2 SDKs] / pmsdk / samples / petzold / chap15|
Return to blowup.c CVS log | Up to [OS/2 SDKs] / pmsdk / samples / petzold / chap15 |
1.1 ! root 1: /*------------------------------------ ! 2: BLOWUP.C -- Screen Capture Program ! 3: ------------------------------------*/ ! 4: ! 5: #define INCL_WIN ! 6: #define INCL_GPI ! 7: #include <os2.h> ! 8: #include "blowup.h" ! 9: ! 10: MRESULT EXPENTRY ClientWndProc (HWND, USHORT, MPARAM, MPARAM) ; ! 11: ! 12: CHAR szClientClass [] = "BlowUp" ; ! 13: HAB hab ; ! 14: ! 15: int main (void) ! 16: { ! 17: static ULONG flFrameFlags = FCF_TITLEBAR | FCF_SYSMENU | ! 18: FCF_SIZEBORDER | FCF_MINMAX | ! 19: FCF_SHELLPOSITION | FCF_TASKLIST | ! 20: FCF_MENU | FCF_ACCELTABLE ; ! 21: HMQ hmq ; ! 22: HWND hwndFrame, hwndClient ; ! 23: QMSG qmsg ; ! 24: ! 25: hab = WinInitialize (0) ; ! 26: hmq = WinCreateMsgQueue (hab, 0) ; ! 27: ! 28: WinRegisterClass (hab, szClientClass, ClientWndProc, CS_SIZEREDRAW, 0) ; ! 29: ! 30: hwndFrame = WinCreateStdWindow (HWND_DESKTOP, WS_VISIBLE, ! 31: &flFrameFlags, szClientClass, NULL, ! 32: 0L, NULL, ID_RESOURCE, &hwndClient) ; ! 33: ! 34: WinSendMsg (hwndFrame, WM_SETICON, ! 35: WinQuerySysPointer (HWND_DESKTOP, SPTR_APPICON, FALSE), ! 36: NULL) ; ! 37: ! 38: while (WinGetMsg (hab, &qmsg, NULL, 0, 0)) ! 39: WinDispatchMsg (hab, &qmsg) ; ! 40: ! 41: WinDestroyWindow (hwndFrame) ; ! 42: WinDestroyMsgQueue (hmq) ; ! 43: WinTerminate (hab) ; ! 44: return 0 ; ! 45: } ! 46: ! 47: BOOL BeginTracking (RECTL *prclTrack) ! 48: { ! 49: LONG cxScreen, cyScreen, cxPointer, cyPointer ; ! 50: TRACKINFO ti ; ! 51: ! 52: cxScreen = WinQuerySysValue (HWND_DESKTOP, SV_CXSCREEN) ; ! 53: cyScreen = WinQuerySysValue (HWND_DESKTOP, SV_CYSCREEN) ; ! 54: cxPointer = WinQuerySysValue (HWND_DESKTOP, SV_CXPOINTER) ; ! 55: cyPointer = WinQuerySysValue (HWND_DESKTOP, SV_CYPOINTER) ; ! 56: ! 57: // Set up track rectangle for moving ! 58: ! 59: ti.cxBorder = 1 ; // Border width ! 60: ti.cyBorder = 1 ; ! 61: ti.cxGrid = 0 ; // Not used ! 62: ti.cyGrid = 0 ; ! 63: ti.cxKeyboard = 4 ; // Pixel increment for keyboard ! 64: ti.cyKeyboard = 4 ; ! 65: ! 66: ti.rclBoundary.xLeft = 0 ; // Area for tracking rectangle ! 67: ti.rclBoundary.yBottom = 0 ; ! 68: ti.rclBoundary.xRight = cxScreen ; ! 69: ti.rclBoundary.yTop = cyScreen ; ! 70: ! 71: ti.ptlMinTrackSize.x = 1 ; // Minimum rectangle size ! 72: ti.ptlMinTrackSize.y = 1 ; ! 73: ! 74: ti.ptlMaxTrackSize.x = cxScreen ; // Maximum rectangle size ! 75: ti.ptlMaxTrackSize.y = cyScreen ; ! 76: // Initial position ! 77: ! 78: ti.rclTrack.xLeft = (cxScreen - cxPointer) / 2 ; ! 79: ti.rclTrack.yBottom = (cyScreen - cyPointer) / 2 ; ! 80: ti.rclTrack.xRight = (cxScreen + cxPointer) / 2 ; ! 81: ti.rclTrack.yTop = (cyScreen + cyPointer) / 2 ; ! 82: ! 83: ti.fs = TF_MOVE | TF_STANDARD | TF_SETPOINTERPOS ; // Flags ! 84: ! 85: if (!WinTrackRect (HWND_DESKTOP, NULL, &ti)) ! 86: return FALSE ; ! 87: // Switch to "sizing" pointer ! 88: WinSetPointer (HWND_DESKTOP, ! 89: WinQuerySysPointer (HWND_DESKTOP, SPTR_SIZENESW, FALSE)) ; ! 90: ! 91: // Track rectangle for sizing ! 92: ! 93: ti.fs = TF_RIGHT | TF_TOP | TF_STANDARD | TF_SETPOINTERPOS ; ! 94: ! 95: if (!WinTrackRect (HWND_DESKTOP, NULL, &ti)) ! 96: return FALSE ; ! 97: ! 98: *prclTrack = ti.rclTrack ; // Final rectangle ! 99: ! 100: return TRUE ; ! 101: } ! 102: ! 103: HBITMAP CopyScreenToBitmap (RECTL *prclTrack) ! 104: { ! 105: BITMAPINFOHEADER bmp ; ! 106: HBITMAP hbm ; ! 107: HDC hdcMemory ; ! 108: HPS hps, hpsMemory ; ! 109: LONG alBmpFormats[2] ; ! 110: POINTL aptl[3] ; ! 111: SIZEL sizl ; ! 112: // Create memory DC and PS ! 113: ! 114: hdcMemory = DevOpenDC (hab, OD_MEMORY, "*", 0L, NULL, NULL) ; ! 115: ! 116: sizl.cx = sizl.cy = 0 ; ! 117: hpsMemory = GpiCreatePS (hab, hdcMemory, &sizl, ! 118: PU_PELS | GPIF_DEFAULT | ! 119: GPIT_MICRO | GPIA_ASSOC) ; ! 120: ! 121: // Create bitmap for destination ! 122: ! 123: GpiQueryDeviceBitmapFormats (hpsMemory, 2L, alBmpFormats) ; ! 124: ! 125: bmp.cbFix = sizeof bmp ; ! 126: bmp.cx = (USHORT) (prclTrack->xRight - prclTrack->xLeft) ; ! 127: bmp.cy = (USHORT) (prclTrack->yTop - prclTrack->yBottom) ; ! 128: bmp.cPlanes = (USHORT) alBmpFormats[0] ; ! 129: bmp.cBitCount = (USHORT) alBmpFormats[1] ; ! 130: ! 131: hbm = GpiCreateBitmap (hpsMemory, &bmp, 0L, NULL, NULL) ; ! 132: ! 133: // Copy from screen to bitmap ! 134: if (hbm != NULL) ! 135: { ! 136: GpiSetBitmap (hpsMemory, hbm) ; ! 137: hps = WinGetScreenPS (HWND_DESKTOP) ; ! 138: ! 139: aptl[0].x = 0 ; ! 140: aptl[0].y = 0 ; ! 141: aptl[1].x = bmp.cx ; ! 142: aptl[1].y = bmp.cy ; ! 143: aptl[2].x = prclTrack->xLeft ; ! 144: aptl[2].y = prclTrack->yBottom ; ! 145: ! 146: WinLockVisRegions (HWND_DESKTOP, TRUE) ; ! 147: ! 148: GpiBitBlt (hpsMemory, hps, 3L, aptl, ROP_SRCCOPY, BBO_IGNORE); ! 149: ! 150: WinLockVisRegions (HWND_DESKTOP, FALSE) ; ! 151: ! 152: WinReleasePS (hps) ; ! 153: } ! 154: // Clean up ! 155: GpiDestroyPS (hpsMemory) ; ! 156: DevCloseDC (hdcMemory) ; ! 157: ! 158: return hbm ; ! 159: } ! 160: ! 161: HBITMAP CopyBitmap (HBITMAP hbmSrc) ! 162: { ! 163: BITMAPINFOHEADER bmp ; ! 164: HBITMAP hbmDst ; ! 165: HDC hdcSrc, hdcDst ; ! 166: HPS hpsSrc, hpsDst ; ! 167: POINTL aptl[3] ; ! 168: SIZEL sizl ; ! 169: ! 170: // Create memory DC's and PS's ! 171: ! 172: hdcSrc = DevOpenDC (hab, OD_MEMORY, "*", 0L, NULL, NULL) ; ! 173: hdcDst = DevOpenDC (hab, OD_MEMORY, "*", 0L, NULL, NULL) ; ! 174: ! 175: sizl.cx = sizl.cy = 0 ; ! 176: hpsSrc = GpiCreatePS (hab, hdcSrc, &sizl, PU_PELS | GPIF_DEFAULT | ! 177: GPIT_MICRO | GPIA_ASSOC) ; ! 178: ! 179: hpsDst = GpiCreatePS (hab, hdcDst, &sizl, PU_PELS | GPIF_DEFAULT | ! 180: GPIT_MICRO | GPIA_ASSOC) ; ! 181: ! 182: // Create bitmap ! 183: ! 184: GpiQueryBitmapParameters (hbmSrc, &bmp) ; ! 185: hbmDst = GpiCreateBitmap (hpsDst, &bmp, 0L, NULL, NULL) ; ! 186: ! 187: // Copy from source to destination ! 188: ! 189: if (hbmDst != NULL) ! 190: { ! 191: GpiSetBitmap (hpsSrc, hbmSrc) ; ! 192: GpiSetBitmap (hpsDst, hbmDst) ; ! 193: ! 194: aptl[0].x = aptl[0].y = 0 ; ! 195: aptl[1].x = bmp.cx ; ! 196: aptl[1].y = bmp.cy ; ! 197: aptl[2] = aptl[0] ; ! 198: ! 199: GpiBitBlt (hpsDst, hpsSrc, 3L, aptl, ROP_SRCCOPY, BBO_IGNORE) ; ! 200: } ! 201: // Clean up ! 202: GpiDestroyPS (hpsSrc) ; ! 203: GpiDestroyPS (hpsDst) ; ! 204: DevCloseDC (hdcSrc) ; ! 205: DevCloseDC (hdcDst) ; ! 206: ! 207: return hbmDst ; ! 208: } ! 209: ! 210: VOID BitmapCreationError (HWND hwnd) ! 211: { ! 212: WinMessageBox (HWND_DESKTOP, hwnd, "Cannot create bitmap.", ! 213: szClientClass, 0, MB_OK | MB_ICONEXCLAMATION) ; ! 214: } ! 215: ! 216: MRESULT EXPENTRY ClientWndProc (HWND hwnd, USHORT msg, MPARAM mp1, MPARAM mp2) ! 217: { ! 218: static HBITMAP hbm ; ! 219: static HWND hwndMenu ; ! 220: static SHORT sDisplay = IDM_ACTUAL ; ! 221: HBITMAP hbmClip ; ! 222: HPS hps ; ! 223: RECTL rclTrack, rclClient ; ! 224: USHORT usfInfo ; ! 225: ! 226: switch (msg) ! 227: { ! 228: case WM_CREATE: ! 229: hwndMenu = WinWindowFromID ( ! 230: WinQueryWindow (hwnd, QW_PARENT, FALSE), ! 231: FID_MENU) ; ! 232: return 0 ; ! 233: ! 234: case WM_INITMENU: ! 235: switch (SHORT1FROMMP (mp1)) ! 236: { ! 237: case IDM_EDIT: ! 238: WinSendMsg (hwndMenu, MM_SETITEMATTR, ! 239: MPFROM2SHORT (IDM_COPY, TRUE), ! 240: MPFROM2SHORT (MIA_DISABLED, ! 241: hbm != NULL ? 0 : MIA_DISABLED)) ; ! 242: ! 243: WinSendMsg (hwndMenu, MM_SETITEMATTR, ! 244: MPFROM2SHORT (IDM_PASTE, TRUE), ! 245: MPFROM2SHORT (MIA_DISABLED, ! 246: WinQueryClipbrdFmtInfo (hab, CF_BITMAP, &usfInfo) ! 247: ? 0 : MIA_DISABLED)) ; ! 248: return 0 ; ! 249: } ! 250: break ; ! 251: ! 252: case WM_COMMAND: ! 253: switch (COMMANDMSG(&msg)->cmd) ! 254: { ! 255: case IDM_COPY: ! 256: // Make copy of stored bitmap ! 257: ! 258: hbmClip = CopyBitmap (hbm) ; ! 259: ! 260: // Set clipboard data to copy of bitmap ! 261: ! 262: if (hbmClip != NULL) ! 263: { ! 264: WinOpenClipbrd (hab) ; ! 265: WinEmptyClipbrd (hab) ; ! 266: WinSetClipbrdData (hab, (ULONG) hbmClip, ! 267: CF_BITMAP, CFI_HANDLE) ; ! 268: WinCloseClipbrd (hab) ; ! 269: } ! 270: else ! 271: BitmapCreationError (hwnd) ; ! 272: return 0 ; ! 273: ! 274: case IDM_PASTE: ! 275: // Get bitmap from clipboard ! 276: ! 277: WinOpenClipbrd (hab) ; ! 278: hbmClip = WinQueryClipbrdData (hab, CF_BITMAP) ; ! 279: ! 280: if (hbmClip != NULL) ! 281: { ! 282: if (hbm != NULL) ! 283: GpiDeleteBitmap (hbm) ; ! 284: ! 285: // Make copy of it ! 286: ! 287: hbm = CopyBitmap (hbmClip) ; ! 288: ! 289: if (hbm == NULL) ! 290: BitmapCreationError (hwnd) ; ! 291: } ! 292: WinCloseClipbrd (hab) ; ! 293: WinInvalidateRect (hwnd, NULL, FALSE) ; ! 294: return 0 ; ! 295: ! 296: case IDM_CAPTURE: ! 297: if (BeginTracking (&rclTrack)) ! 298: { ! 299: if (hbm != NULL) ! 300: GpiDeleteBitmap (hbm) ; ! 301: ! 302: hbm = CopyScreenToBitmap (&rclTrack) ; ! 303: ! 304: if (hbm == NULL) ! 305: BitmapCreationError (hwnd) ; ! 306: ! 307: WinInvalidateRect (hwnd, NULL, FALSE) ; ! 308: } ! 309: return 0 ; ! 310: ! 311: case IDM_ACTUAL: ! 312: case IDM_STRETCH: ! 313: WinSendMsg (hwndMenu, MM_SETITEMATTR, ! 314: MPFROM2SHORT (sDisplay, TRUE), ! 315: MPFROM2SHORT (MIA_CHECKED, 0)) ; ! 316: ! 317: sDisplay = COMMANDMSG(&msg)->cmd ; ! 318: ! 319: WinSendMsg (hwndMenu, MM_SETITEMATTR, ! 320: MPFROM2SHORT (sDisplay, TRUE), ! 321: MPFROM2SHORT (MIA_CHECKED, MIA_CHECKED)) ; ! 322: ! 323: WinInvalidateRect (hwnd, NULL, FALSE) ; ! 324: return 0 ; ! 325: } ! 326: ! 327: case WM_PAINT: ! 328: hps = WinBeginPaint (hwnd, NULL, NULL) ; ! 329: GpiErase (hps) ; ! 330: ! 331: if (hbm != NULL) ! 332: { ! 333: WinQueryWindowRect (hwnd, &rclClient) ; ! 334: ! 335: WinDrawBitmap (hps, hbm, NULL, (PPOINTL) &rclClient, ! 336: CLR_NEUTRAL, CLR_BACKGROUND, ! 337: sDisplay == IDM_STRETCH ? ! 338: DBM_STRETCH : DBM_NORMAL) ; ! 339: } ! 340: WinEndPaint (hps) ; ! 341: return 0 ; ! 342: ! 343: case WM_DESTROY: ! 344: if (hbm != NULL) ! 345: GpiDeleteBitmap (hbm) ; ! 346: return 0 ; ! 347: } ! 348: return WinDefWindowProc (hwnd, msg, mp1, mp2) ; ! 349: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.