home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / OS2BAS.ZIP / GPIMETA.BI < prev    next >
Text File  |  1989-07-25  |  2KB  |  77 lines
  1. '**************************************************************
  2. '*
  3. '* Include File: GpiMeta.BI
  4. '*
  5. '* Requires:     none
  6. '*
  7. '* Description:  Metafile Manager
  8. '*
  9. '**************************************************************
  10.  
  11. '  constants for index values of options array for GpiPlayMetafile
  12. CONST  PMFSEGBASE     =    0
  13. CONST  PMFLOADTYPE     =    1
  14. CONST  PMFRESOLVE     =    2
  15. CONST  PMFLCIDS      =    3
  16. CONST  PMFRESET      =    4
  17. CONST  PMFSUPPRESS     =    5
  18. CONST  PMFCOLORTABLES     =    6
  19. CONST  PMFCOLORREALIZABLE  =  7
  20.  
  21. '  options for GpiPlayMetafile
  22. CONST  RSDEFAULT    =  0
  23. CONST  RSNODISCARD  =  1
  24. CONST  LCDEFAULT    =  0
  25. CONST  LCNOLOAD     =  1
  26. CONST  LCLOADDISC   =  3
  27. CONST  LTDEFAULT    =  0
  28. CONST  LTNOMODIFY   =  1
  29.  
  30. CONST  LTORIGINALVIEW = 4
  31. CONST  RESDEFAULT   =  0
  32. CONST  RESNORESET   =  1
  33. CONST  RESRESET     =  2
  34. CONST  SUPDEFAULT   =  0
  35. CONST  SUPNOSUPPRESS =    1
  36. CONST  SUPSUPPRESS   = 2
  37. CONST  CTABDEFAULT   = 0
  38. CONST  CTABNOMODIFY  = 1
  39. CONST  CTABREPLACE   = 3
  40. CONST  CREADEFAULT   = 0
  41. CONST  CREAREALIZE   = 1
  42. CONST  CREANOREALIZE = 2
  43. CONST  RSPDEFAULT    = 0
  44. CONST  RSPNODISCARD  = 1
  45.  
  46. ' ** metafile functions
  47. DECLARE FUNCTION   GpiLoadMetaFile&( BYVAL HAB AS LONG,_
  48.                      BYVAL PSZ AS LONG )
  49.  
  50. DECLARE FUNCTION   GpiPlayMetaFile&( BYVAL HPS AS LONG,_
  51.                      BYVAL HMF AS LONG,_
  52.                      BYVAL ALONG AS LONG,_
  53.                      BYVAL APLONG AS LONG,_
  54.                      BYVAL BPLONG AS LONG,_
  55.                      BYVAL BLONG AS LONG,_
  56.                      BYVAL PSZ AS LONG )
  57.  
  58. DECLARE FUNCTION   GpiSaveMetaFile%( BYVAL HMF AS LONG,_
  59.                      BYVAL PSZ AS LONG )
  60.  
  61. DECLARE FUNCTION   GpiDeleteMetaFile%( BYVAL HMF AS LONG )
  62.  
  63. DECLARE FUNCTION   GpiCopyMetaFile&( BYVAL HMF AS LONG )
  64.  
  65. DECLARE FUNCTION   GpiQueryMetaFileLength&( BYVAL HMF AS LONG )
  66.  
  67. DECLARE FUNCTION   GpiQueryMetaFileBits%( BYVAL HMF AS LONG,_
  68.                       BYVAL ALONG AS LONG,_
  69.                       BYVAL BLONG AS LONG,_
  70.                       BYVAL PBYTE AS LONG )
  71.  
  72. DECLARE FUNCTION   GpiSetMetaFileBits%( BYVAL HMF AS LONG,_
  73.                     BYVAL ALONG AS LONG,_
  74.                     BYVAL BLONG AS LONG,_
  75.                     BYVAL PBYTE AS LONG )
  76.  
  77.