home *** CD-ROM | disk | FTP | other *** search
/ Programming Tool Box / SIMS_2.iso / vb_code2 / p_print / pprtrbas.txt < prev    next >
Text File  |  1994-07-07  |  9KB  |  234 lines
  1.  
  2. Global oldprinter$
  3.  
  4. ' field selection bits
  5. Global Const DM_ORIENTATION = &H1
  6. Global Const DM_PAPERSIZE = &H2
  7. Global Const DM_PAPERLENGTH = &H4
  8. Global Const DM_PAPERWIDTH = &H8
  9. Global Const DM_SCALE = &H10
  10. Global Const DM_COPIES = &H100
  11. Global Const DM_DEFAULTSOURCE = &H200
  12. Global Const DM_PRINTQUALITY = &H400
  13. Global Const DM_COLOR = &H800
  14. Global Const DM_DUPLEX = &H1000
  15. Global Const DM_YRESOLUTION = &H2000
  16. Global Const DM_TTOPTION = &H4000
  17.  
  18. ' orientation selections
  19. Global Const DMORIENT_PORTRAIT = 1
  20. Global Const DMORIENT_LANDSCAPE = 2
  21.  
  22. ' paper selections
  23. '  Warning: The PostScript driver mistakingly uses DMPAPER_ values between
  24. ' *  50 and 56.  Don't use this range when defining new paper sizes.
  25.  
  26. Global Const DMPAPER_FIRST = 1
  27. Global Const DMPAPER_LETTER = 1               ' Letter 8 1/2 x 11 in
  28. Global Const DMPAPER_LETTERSMALL = 2          ' Letter Small 8 1/2 x 11 in
  29. Global Const DMPAPER_TABLOID = 3              ' Tabloid 11 x 17 in
  30. Global Const DMPAPER_LEDGER = 4               ' Ledger 17 x 11 in
  31. Global Const DMPAPER_LEGAL = 5                ' Legal 8 1/2 x 14 in
  32. Global Const DMPAPER_STATEMENT = 6            ' Statement 5 1/2 x 8 1/2 in
  33. Global Const DMPAPER_EXECUTIVE = 7            ' Executive 7 1/4 x 10 1/2 in
  34. Global Const DMPAPER_A3 = 8                   ' A3 297 x 420 mm
  35. Global Const DMPAPER_A4 = 9                   ' A4 210 x 297 mm
  36. Global Const DMPAPER_A4SMALL = 10             ' A4 Small 210 x 297 mm
  37. Global Const DMPAPER_A5 = 11                  ' A5 148 x 210 mm
  38. Global Const DMPAPER_B4 = 12                  ' B4 250 x 354
  39. Global Const DMPAPER_B5 = 13                  ' B5 182 x 257 mm
  40. Global Const DMPAPER_FOLIO = 14               ' Folio 8 1/2 x 13 in
  41. Global Const DMPAPER_QUARTO = 15              ' Quarto 215 x 275 mm
  42. Global Const DMPAPER_10x14 = 16               ' 10x14 in
  43. Global Const DMPAPER_11X17 = 17               ' 11x17 in
  44. Global Const DMPAPER_NOTE = 18                ' Note 8 1/2 x 11 in
  45. Global Const DMPAPER_ENV_9 = 19               ' Envelope #9 3 7/8 x 8 7/8
  46. Global Const DMPAPER_ENV_10 = 20              ' Envelope #10 4 1/8 x 9 1/2
  47. Global Const DMPAPER_ENV_11 = 21              ' Envelope #11 4 1/2 x 10 3/8
  48. Global Const DMPAPER_ENV_12 = 22              ' Envelope #12 4 \276 x 11
  49. Global Const DMPAPER_ENV_14 = 23              ' Envelope #14 5 x 11 1/2
  50. Global Const DMPAPER_CSHEET = 24              ' C size sheet
  51. Global Const DMPAPER_DSHEET = 25              ' D size sheet
  52. Global Const DMPAPER_ESHEET = 26              ' E size sheet
  53. Global Const DMPAPER_ENV_DL = 27              ' Envelope DL 110 x 220mm
  54. Global Const DMPAPER_ENV_C5 = 28              ' Envelope C5 162 x 229 mm
  55. Global Const DMPAPER_ENV_C3 = 29              ' Envelope C3  324 x 458 mm
  56. Global Const DMPAPER_ENV_C4 = 30              ' Envelope C4  229 x 324 mm
  57. Global Const DMPAPER_ENV_C6 = 31              ' Envelope C6  114 x 162 mm
  58. Global Const DMPAPER_ENV_C65 = 32             ' Envelope C65 114 x 229 mm
  59. Global Const DMPAPER_ENV_B4 = 33              ' Envelope B4  250 x 353 mm
  60. Global Const DMPAPER_ENV_B5 = 34              ' Envelope B5  176 x 250 mm
  61. Global Const DMPAPER_ENV_B6 = 35              ' Envelope B6  176 x 125 mm
  62. Global Const DMPAPER_ENV_ITALY = 36           ' Envelope 110 x 230 mm
  63. Global Const DMPAPER_ENV_MONARCH = 37         ' Envelope Monarch 3.875 x 7.5 in
  64. Global Const DMPAPER_ENV_PERSONAL = 38        ' 6 3/4 Envelope 3 5/8 x 6 1/2 in
  65. Global Const DMPAPER_FANFOLD_US = 39          ' US Std Fanfold 14 7/8 x 11 in
  66. Global Const DMPAPER_FANFOLD_STD_GERMAN = 40  ' German Std Fanfold 8 1/2 x 12 in
  67. Global Const DMPAPER_FANFOLD_LGL_GERMAN = 41  ' German Legal Fanfold 8 1/2 x 13 in
  68.  
  69. Global Const DMPAPER_LAST = 41
  70.  
  71. Global Const DMPAPER_USER = 256
  72.  
  73. ' bin selections
  74. Global Const DMBIN_FIRST = 1
  75. Global Const DMBIN_UPPER = 1
  76. Global Const DMBIN_ONLYONE = 1
  77. Global Const DMBIN_LOWER = 2
  78. Global Const DMBIN_MIDDLE = 3
  79. Global Const DMBIN_MANUAL = 4
  80. Global Const DMBIN_ENVELOPE = 5
  81. Global Const DMBIN_ENVMANUAL = 6
  82. Global Const DMBIN_AUTO = 7
  83. Global Const DMBIN_TRACTOR = 8
  84. Global Const DMBIN_SMALLFMT = 9
  85. Global Const DMBIN_LARGEFMT = 10
  86. Global Const DMBIN_LARGECAPACITY = 11
  87. Global Const DMBIN_CASSETTE = 14
  88. Global Const DMBIN_LAST = 14
  89.  
  90. Global Const DMBIN_USER = 256             ' device specific bins start here
  91.  
  92. ' print qualities
  93. Global Const DMRES_DRAFT = (-1)
  94. Global Const DMRES_LOW = (-2)
  95. Global Const DMRES_MEDIUM = (-3)
  96. Global Const DMRES_HIGH = (-4)
  97.  
  98. ' color enable/disable for color printers
  99. Global Const DMCOLOR_MONOCHROME = 1
  100. Global Const DMCOLOR_COLOR = 2
  101.  
  102. ' duplex enable
  103. Global Const DMDUP_SIMPLEX = 1
  104. Global Const DMDUP_VERTICAL = 2
  105. Global Const DMDUP_HORIZONTAL = 3
  106.  
  107. ' TrueType options
  108. Global Const DMTT_BITMAP = 1          ' print TT fonts as graphics
  109. Global Const DMTT_DOWNLOAD = 2        ' download TT fonts as soft fonts
  110. Global Const DMTT_SUBDEV = 3          ' substitute device fonts for TT fonts
  111.  
  112. Global Const PP_GIMME = 0
  113. Global Const PP_CHANGE_IT = 1
  114. Global Const PP_UNNEEDED = 0
  115.  
  116. '================ device capabilities ================
  117. Type DEVCAP
  118.       DRIVERVERSION As Integer
  119.       TECHNOLOGY    As Integer 'bits
  120.       HORZSIZE      As Integer
  121.       VERTSIZE      As Integer
  122.       HORZRES       As Integer
  123.       VERTRES       As Integer
  124.       BITSPIXEL     As Integer
  125.       PLANES        As Integer
  126.       NUMBRUSHES    As Integer
  127.       NUMPENS       As Integer
  128.       NUMMARKERS    As Integer
  129.       NUMFONTS      As Integer
  130.       NUMCOLORS     As Integer
  131.       PDEVICESIZE   As Integer
  132.       CURVECAPS     As Integer ' bits
  133.       LINECAPS      As Integer ' bits
  134.       POLYGONALCAPS As Integer ' bits
  135.       TEXTCAPS      As Integer ' bits
  136.       CLIPCAPS      As Integer ' bits
  137.       RASTERCAPS    As Integer ' bits
  138.       ASPECTX       As Integer
  139.       ASPECTY       As Integer
  140.       ASPECTXY      As Integer
  141.       LOGPIXELSX    As Integer
  142.       LOGPIXELSY    As Integer
  143.       SIZEPALETTE  As Integer
  144.       NUMRESERVED  As Integer
  145.       COLORRES     As Integer
  146. End Type
  147. Global dc As DEVCAP
  148. '---- return value masks ---
  149.  
  150. ' TECHNOLOGY
  151. Global Const DT_PLOTTER = 0
  152. Global Const DT_RASDISPLAY = 1
  153. Global Const DT_RASPRINTER = 2
  154. Global Const DT_RASCAMERA = 3
  155. Global Const DT_CHARSTREAM = 4
  156. Global Const DT_METAFILE = 5
  157. Global Const DT_DISPFILE = 6
  158.  
  159. ' CURVECAPS
  160. Global Const CC_NONE = &H0
  161. Global Const CC_CIRCLES = &H1
  162. Global Const CC_PIE = &H2
  163. Global Const CC_CHORD = &H4
  164. Global Const CC_ELLIPSES = &H8
  165. Global Const CC_WIDE = &H10
  166. Global Const CC_STYLED = &H20
  167. Global Const CC_WIDESTYLED = &H40
  168. Global Const CC_INTERIORS = &H80
  169. Global Const CC_ROUNDRECT = &H100
  170.                                
  171. ' LINECAPS
  172. Global Const LC_NONE = &H0
  173. Global Const LC_POLYLINE = &H2
  174. Global Const LC_MARKER = &H4
  175. Global Const LC_POLYMARKER = &H8
  176. Global Const LC_WIDE = &H10
  177. Global Const LC_STYLED = &H20
  178. Global Const LC_WIDESTYLED = &H40
  179. Global Const LC_INTERIORS = &H80
  180.  
  181. ' POLYGONALCAPS
  182. Global Const PC_NONE = &H0
  183. Global Const PC_POLYGON = &H1
  184. Global Const PC_RECTANGLE = &H2
  185. Global Const PC_WINDPOLYGON = &H4
  186. Global Const PC_SCANLINE = &H8
  187. Global Const PC_WIDE = &H10
  188. Global Const PC_STYLED = &H20
  189. Global Const PC_WIDESTYLED = &H40
  190. Global Const PC_INTERIORS = &H80
  191.  
  192. ' TEXTCAPS
  193. Global Const TC_OP_CHARACTER = &H1
  194. Global Const TC_OP_STROKE = &H2
  195. Global Const TC_CP_STROKE = &H4
  196. Global Const TC_CR_90 = &H8
  197. Global Const TC_CR_ANY = &H10
  198. Global Const TC_SF_X_YINDEP = &H20
  199. Global Const TC_SA_DOUBLE = &H40
  200. Global Const TC_SA_INTEGER = &H80
  201. Global Const TC_SA_CONTIN = &H100
  202. Global Const TC_EA_DOUBLE = &H200
  203. Global Const TC_IA_ABLE = &H400
  204. Global Const TC_UA_ABLE = &H800
  205. Global Const TC_SO_ABLE = &H1000
  206. Global Const TC_RA_ABLE = &H2000
  207. Global Const TC_VA_ABLE = &H4000
  208. Global Const TC_RESERVED = &H8000
  209.  
  210. ' CLIPCAPS
  211. Global Const CP_NONE = &H0
  212. Global Const CP_RECTANGLE = &H1
  213. Global Const CP_REGION = &H2
  214.                                
  215. ' RASTERCAPS
  216. Global Const RC_NONE = &H0
  217. Global Const RC_BITBLT = &H1
  218. Global Const RC_BANDING = &H2
  219. Global Const RC_SCALING = &H4
  220. Global Const RC_BITMAP64 = &H8
  221. Global Const RC_GDI20_OUTPUT = &H10
  222. Global Const RC_GDI20_STATE = &H20
  223. Global Const RC_SAVEBITMAP = &H40
  224. Global Const RC_DI_BITMAP = &H80
  225. Global Const RC_PALETTE = &H100
  226. Global Const RC_DIBTODEV = &H200
  227. Global Const RC_BIGFONT = &H400
  228. Global Const RC_STRETCHBLT = &H800
  229. Global Const RC_FLOODFILL = &H1000
  230. Global Const RC_STRETCHDIB = &H2000
  231. Global Const RC_OP_DX_OUTPUT = &H4000
  232. Global Const RC_DEVBITS = &H8000
  233.  
  234.