home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / OS2BAS.ZIP / GPIPATH.BI < prev    next >
Text File  |  1989-07-25  |  2KB  |  60 lines
  1. '**************************************************************
  2. '*
  3. '* Include File: GpiPath.BI
  4. '*
  5. '* Requires:     PMBase.BI (RECTL type)
  6. '*
  7. '* Description:  Path control functions
  8. '*
  9. '*************************************************************
  10. ' ** general clipping functions
  11. DECLARE FUNCTION GpiSetGraphicsField%( BYVAL HPS AS LONG,_
  12.                        BYVAL PRECTL AS LONG )
  13.  
  14. DECLARE FUNCTION GpiQueryGraphicsField%( BYVAL HPS AS LONG,_
  15.                      BYVAL PRECTL AS LONG )
  16.  
  17. DECLARE FUNCTION GpiSetViewingLimits%( BYVAL HPS AS LONG,_
  18.                        BYVAL PRECTL AS LONG )
  19.  
  20. DECLARE FUNCTION GpiQueryViewingLimits%( BYVAL HPS AS LONG,_
  21.                      BYVAL PRECTL AS LONG )
  22.  
  23. '  modes for GpiModifyPath
  24. CONST  MPATHSTROKE        =  6
  25.  
  26. '  modes for GpiFillPath
  27. CONST  FPATHALTERNATE        =  0
  28. CONST  FPATHWINDING        =  2
  29.  
  30. '  modes for GpiSetClipPath
  31. CONST  SCPALTERNATE        =  0
  32. CONST  SCPWINDING        =  2
  33. CONST  SCPAND            =  4
  34. CONST  SCPRESET         =  0
  35.  
  36. ' ** Path and Clip Path functions
  37. DECLARE FUNCTION  GpiBeginPath%( BYVAL HPS AS LONG,_
  38.                  BYVAL ALONG AS LONG )
  39.  
  40. DECLARE FUNCTION  GpiEndPath%( BYVAL HPS AS LONG )
  41.  
  42. DECLARE FUNCTION  GpiCloseFigure%( BYVAL HPS AS LONG )
  43.  
  44. DECLARE FUNCTION  GpiModifyPath%( BYVAL HPS AS LONG,_
  45.                   BYVAL ALONG AS LONG,_
  46.                   BYVAL BLONG AS LONG )
  47.  
  48. DECLARE FUNCTION  GpiFillPath&( BYVAL HPS AS LONG,_
  49.                 BYVAL ALONG AS LONG,_
  50.                 BYVAL BLONG AS LONG )
  51.  
  52. DECLARE FUNCTION  GpiSetClipPath%( BYVAL HPS AS LONG,_
  53.                    BYVAL ALONG AS LONG,_
  54.                    BYVAL BLONG AS LONG )
  55.  
  56. DECLARE FUNCTION  GpiStrokePath&( BYVAL HPS AS LONG,_
  57.                   BYVAL ALONG AS LONG,_
  58.                   BYVAL ULONG AS LONG )
  59.  
  60.