home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Controls / Visual Basic Controls.iso / vbcontrol / w3d / module1.bas < prev    next >
Encoding:
BASIC Source File  |  1998-04-26  |  663 b   |  19 lines
  1. Attribute VB_Name = "Module1"
  2. Declare Function GetSystemMetrics Lib "user32" (ByVal nIndex As Long) As Long
  3. Public Const SM_CYMENU = 15
  4. Public Const SM_CYFRAME = 33
  5. Public Const SM_CXFRAME = 32
  6. Public Const SM_CYCAPTION = 4
  7. Global TW_X As Integer
  8. Global TW_Y As Integer
  9. Global oldXmin#, oldXmax#, oldYmin#, oldYmax#, oldZmin#, oldZmax#
  10. Global Oldshow3DplaneXY As Boolean
  11. Global oldshow3Dboundaries As Boolean
  12. Global olddrawXYZproportional2Ranges As Boolean
  13. Global oldshow3Daxes As Boolean
  14. Global OldshowIsPerspective As Boolean
  15. Global oldshow3DaxesNames As Boolean
  16. Global oldSelectLineByMouse As Boolean
  17. Global oldSelectPointByMouse As Boolean
  18.  
  19.