+ RECTL vRect;
+ SIZEL vSize = {0, 0};
+ DEVOPENSTRUC vDop = {0L, "DISPLAY", NULL, 0L, 0L, 0L, 0L, 0L, 0L};
+ HDC hDC = ::DevOpenDC( vHabmain
+ ,OD_MEMORY
+ ,"*"
+ ,5L
+ ,(PDEVOPENDATA)&vDop
+ ,NULLHANDLE
+ );
+
+ vRect.xLeft = rTopLeft.x;
+ vRect.xRight = rBottomRight.x;
+ vRect.yBottom = rBottomRight.y;
+ vRect.yTop = rTopLeft.y;
+
+ m_refData = new wxRegionRefData;
+
+ //
+ // Need a PS to create a Region
+ //
+ ((wxRegionRefData*)m_refData)->m_hPS = ::GpiCreatePS( vHabmain
+ ,hDC
+ ,&vSize
+ ,PU_PELS | GPIT_MICRO | GPIA_ASSOC
+ );
+ M_REGION = ::GpiCreateRegion( ((wxRegionRefData*)m_refData)->m_hPS
+ ,1
+ ,&vRect
+ );
+} // end of wxRegion::wxRegion
+
+wxRegion::wxRegion(
+ const wxRect& rRect
+)
+{
+ RECTL vRect;
+ SIZEL vSize = {0, 0};
+ DEVOPENSTRUC vDop = {0L, "DISPLAY", NULL, 0L, 0L, 0L, 0L, 0L, 0L};
+ HDC hDC = ::DevOpenDC( vHabmain
+ ,OD_MEMORY
+ ,"*"
+ ,5L
+ ,(PDEVOPENDATA)&vDop
+ ,NULLHANDLE
+ );
+
+
+ vRect.xLeft = rRect.x;
+ vRect.xRight = rRect.x + rRect.width;
+ vRect.yBottom = rRect.y;
+ vRect.yTop = rRect.y + rRect.height;
+
+ m_refData = new wxRegionRefData;
+
+ //
+ // Need a PS to create a Region
+ //
+ ((wxRegionRefData*)m_refData)->m_hPS = ::GpiCreatePS( vHabmain
+ ,hDC
+ ,&vSize
+ ,PU_PELS | GPIT_MICRO | GPIA_ASSOC
+ );
+ M_REGION = ::GpiCreateRegion( ((wxRegionRefData*)m_refData)->m_hPS
+ ,1
+ ,&vRect
+ );
+} // end of wxRegion::wxRegion
+
+//
+// Destroy the region.
+//