home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / OS2BAS.ZIP / GPICHAR.BI < prev    next >
Encoding:
Text File  |  1989-08-16  |  3.7 KB  |  128 lines

  1. '**************************************************************
  2. '*
  3. '* Include File: GpiChar.BI
  4. '*
  5. '* Requires:     PMBase.BI (RECTL type)
  6. '*               OS2Def.BI (POINTL type)
  7. '*               GpiCont.BI (SIZEL type)
  8. '*               GpiLine.BI (SIZEF type)
  9. '*
  10. '* Description:  Character output controls
  11. '*
  12. '**************************************************************
  13.  
  14. '  array indices for GpiQueryTextBox
  15. CONST  TXTBOXTOPLEFT    =  0
  16. CONST  TXTBOXBOTTOMLEFT =  1
  17. CONST  TXTBOXTOPRIGHT    =  2
  18. CONST  TXTBOXBOTTOMRIGHT =  3
  19. CONST  TXTBOXCONCAT    =  4
  20.  
  21. '  array count for GpiQueryTextBox
  22. CONST  TXTBOXCOUNT    =  5
  23.  
  24. '  formatting options for GpiCharStringPosAt
  25. CONST  CHSOPAQUE        =  &H0001
  26. CONST  CHSVECTOR        =  &H0002
  27. CONST  CHSLEAVEPOS        =  &H0008
  28. CONST  CHSCLIP            =  &H0010
  29.  
  30. '  character directions
  31. CONST  CHDIRNERROR      =    -1
  32. CONST  CHDIRNDEFAULT      =    0
  33. CONST  CHDIRNLEFTRIGHT      =    1
  34. CONST  CHDIRNTOPBOTTOM      =    2
  35. CONST  CHDIRNRIGHTLEFT      =    3
  36. CONST  CHDIRNBOTTOMTOP      =    4
  37.  
  38. '  character modes
  39. CONST  CMERROR          =    -1
  40. CONST  CMDEFAULT      =    0
  41. CONST  CMMODE1          =    1
  42. CONST  CMMODE2          =    2
  43. CONST  CMMODE3          =    3
  44.  
  45. '  structure for gradient parameters e.g. for GpiSetCharAngle
  46. TYPE GRADIENTL       '  gradl
  47.     x AS LONG
  48.     y AS LONG
  49. END TYPE
  50.  
  51. ' ** character primitive functions
  52. DECLARE FUNCTION  GpiCharString&( BYVAL HPS AS LONG,_
  53.                   BYVAL ALONG AS LONG,_
  54.                   BYVAL PCH AS LONG )
  55.  
  56. DECLARE FUNCTION  GpiCharStringAt&( BYVAL HPS AS LONG,_
  57.                     BYVAL PPOINTL AS LONG,_
  58.                     BYVAL ALONG AS LONG,_
  59.                     BYVAL PCH AS LONG )
  60.  
  61. ' ** character primitive functions
  62. DECLARE FUNCTION  GpiQueryCharStringPos%( BYVAL HPS AS LONG,_
  63.                       BYVAL ULONG AS LONG,_
  64.                       BYVAL ALONG AS LONG,_
  65.                       BYVAL PCH AS LONG,_
  66.                       BYVAL PLONG AS LONG,_
  67.                       BYVAL PPOINTL AS LONG )
  68.  
  69. DECLARE FUNCTION  GpiQueryCharStringPosAt%( BYVAL HPS AS LONG,_
  70.                         BYVAL APPOINTL AS LONG,_
  71.                         BYVAL ULONG AS LONG,_
  72.                         BYVAL ALONG AS LONG,_
  73.                         BYVAL PCH AS LONG,_
  74.                         BYVAL PLONG AS LONG,_
  75.                         BYVAL BPPOINTL AS LONG )
  76.  
  77. DECLARE FUNCTION  GpiQueryTextBox%( BYVAL HPS AS LONG,_
  78.                     BYVAL ALONG AS LONG,_
  79.                     BYVAL PCH AS LONG,_
  80.                     BYVAL BLONG AS LONG,_
  81.                     BYVAL PPOINTL AS LONG )
  82.  
  83. DECLARE FUNCTION  GpiQueryDefCharBox%( BYVAL HPS AS LONG,_
  84.                        BYVAL PSIZEL AS LONG )
  85.  
  86. DECLARE FUNCTION  GpiSetCharBox%( BYVAL HPS AS LONG,_
  87.                   BYVAL PSIZEF AS LONG)
  88.  
  89. DECLARE FUNCTION  GpiQueryCharBox%( BYVAL HPS AS LONG,_
  90.                     BYVAL PSIZEF AS LONG)
  91.  
  92. DECLARE FUNCTION  GpiSetCharAngle%( BYVAL HPS AS LONG,_
  93.                     BYVAL PGRADIENTL AS LONG)
  94.  
  95. DECLARE FUNCTION  GpiQueryCharAngle%( BYVAL HPS AS LONG,_
  96.                       BYVAL PGRADIENTL AS LONG)
  97.  
  98. DECLARE FUNCTION  GpiSetCharShear%( BYVAL HPS AS LONG,_
  99.                     BYVAL PPOINTL AS LONG )
  100.  
  101. DECLARE FUNCTION  GpiQueryCharShear%( BYVAL HPS AS LONG,_
  102.                       BYVAL PPOINTL AS LONG )
  103.  
  104. DECLARE FUNCTION  GpiSetCharDirection%( BYVAL HPS AS LONG,_
  105.                     BYVAL ALONG AS LONG )
  106.  
  107. DECLARE FUNCTION  GpiQueryCharDirection&( BYVAL HPS AS LONG )
  108.  
  109. DECLARE FUNCTION  GpiSetCharMode%( BYVAL HPS AS LONG,_
  110.                    BYVAL ALONG AS LONG )
  111.  
  112. DECLARE FUNCTION  GpiQueryCharMode&( BYVAL HPS AS LONG )
  113.  
  114. DECLARE FUNCTION  GpiCharStringPos&( BYVAL HPS AS LONG,_
  115.                      BYVAL PRECTL AS LONG,_
  116.                      BYVAL ULONG AS LONG,_
  117.                      BYVAL ALONG AS LONG,_
  118.                      BYVAL PCH AS LONG,_
  119.                      BYVAL PLONG AS LONG )
  120.  
  121. DECLARE FUNCTION  GpiCharStringPosAt&( BYVAL HPS AS LONG,_
  122.                        BYVAL PPOINTL AS LONG,_
  123.                        BYVAL PRECTL AS LONG,_
  124.                        BYVAL ULONG AS LONG,_
  125.                        BYVAL ALONG AS LONG,_
  126.                        BYVAL PCH AS LONG,_
  127.                        BYVAL PLONG AS LONG )
  128.