home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / previe_1 / basprevi.bas next >
Encoding:
BASIC Source File  |  1999-05-07  |  1.2 KB  |  45 lines
  1. Attribute VB_Name = "basPreviewPrint"
  2. Option Explicit
  3.  
  4. 'all measurements used in PreviewPrint are in
  5. 'tenths of millimeters, this constant is provided
  6. 'for conversion of scales to millimeters if required
  7. Public Const nMmToPP = 10#  'multiply value in mm by this for previewprint
  8. Public Const nPPToMm = 0.1  'multiply value in previewprint by this for mm
  9.  
  10. 'SetFont options
  11. Public Const PPF_BOLD = 1
  12. Public Const PPF_ITALIC = 2
  13. Public Const PPF_UNDERLINE = 4
  14. Public Const PPF_STRIKEOUT = 8
  15.  
  16. 'SetTextAlign options
  17. Public Const PPA_NOUPDATECP = 0
  18. Public Const PPA_UPDATECP = 1
  19.  
  20. Public Const PPA_LEFT = 0
  21. Public Const PPA_CENTER = 6
  22. Public Const PPA_RIGHT = 2
  23.  
  24. Public Const PPA_TOP = 0
  25. Public Const PPA_BASELINE = 24
  26. Public Const PPA_BOTTOM = 8
  27.  
  28. 'SetLineStyle styles
  29. Public Const PPL_SOLID = 0
  30. Public Const PPL_DASH = 1            ' -------
  31. Public Const PPL_DOT = 2             ' .......
  32. Public Const PPL_DASHDOT = 3         ' _._._._
  33. Public Const PPL_DASHDOTDOT = 4      ' _.._.._
  34. Public Const PPL_INSIDEFRAME = 6
  35.  
  36. 'paper orientation
  37. Public Const PPO_PORTRAIT = 1
  38. Public Const PPO_LANDSCAPE = 2
  39.  
  40. 'state constants
  41. Public Const PPS_IDLE = 0
  42. Public Const PPS_PREVIEW = 1
  43. Public Const PPS_PRINT = 2
  44.  
  45.