[Win32forth-cvs] win32forth/src/gdi gdiDC.f,1.9,1.10

[Dirk B. <db...@us...>]

Update of /cvsroot/win32forth/win32forth/src/gdi
In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv24599/src/gdi

Modified Files:
	gdiDC.f 
Log Message:
- Fixed some smal bugs
- Clean up of some demos

Index: gdiDC.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/gdi/gdiDC.f,v
retrieving revision 1.9
retrieving revision 1.10
diff -C2 -d -r1.9 -r1.10
*** gdiDC.f	20 Apr 2008 13:46:22 -0000	1.9
--- gdiDC.f	26 Apr 2008 11:14:36 -0000	1.10
***************
*** 145,149 ****
  \ ** The DC is restored by popping state information off a stack created by
  \ ** earlier calls to the Save method.
!         -1 hObject call RestoreDC ?win-error ;M
  
  :M Cancel:      ( -- )
--- 145,149 ----
  \ ** The DC is restored by popping state information off a stack created by
  \ ** earlier calls to the Save method.
!         hObject call RestoreDC ?win-error ;M
  
  :M Cancel:      ( -- )
***************
*** 1085,1089 ****
  \ *P \i nWidth \d width of destination rectangle
  \ *P \i nHeight \d height of destination rectangle
! \ *P \i hdcSrc \d handle to source DC
  \ *P \i nXSrc \d x-coordinate of source upper-left corner
  \ *P \i nYSrc \d y-coordinate of source upper-left corner
--- 1085,1089 ----
  \ *P \i nWidth \d width of destination rectangle
  \ *P \i nHeight \d height of destination rectangle
! \ *P \i hdcSrc \d source DC
  \ *P \i nXSrc \d x-coordinate of source upper-left corner
  \ *P \i nYSrc \d y-coordinate of source upper-left corner
***************
*** 1240,1244 ****
  \ ** and stroking and filling the path separately, except that the filled region will not overlap the
  \ ** stroked region even if the pen is wide.
!         hObject Call StrokeAndFillPath  ?win-error ;M
  
  :M WidenPath:   ( -- )
--- 1240,1244 ----
  \ ** and stroking and filling the path separately, except that the filled region will not overlap the
  \ ** stroked region even if the pen is wide.
!         hObject Call StrokeAndFillPath ?win-error ;M
  
  :M WidenPath:   ( -- )
***************
*** 1248,1252 ****
  \ ** ExtCreatePen function, or if the pen is created with the CreatePen function and has a width, in
  \ ** device units, of more than one.
! \ ** The device context identified by the hdc parameter must contain a closed path.
  \ ** Any Bézier curves in the path are converted to sequences of straight lines approximating the
  \ ** widened curves. As such, no Bézier curves remain in the path after WidenPath is called.
--- 1248,1252 ----
  \ ** ExtCreatePen function, or if the pen is created with the CreatePen function and has a width, in
  \ ** device units, of more than one.
! \ ** The device context must contain a closed path.
  \ ** Any Bézier curves in the path are converted to sequences of straight lines approximating the
  \ ** widened curves. As such, no Bézier curves remain in the path after WidenPath is called.