Emmanuele Sassi
143 lines
3.0 KiB
VB.net
143 lines
3.0 KiB
VB.net
'----------------------------------------------------------------------------
|
|
' EgalTech 2015-2017
|
|
'----------------------------------------------------------------------------
|
|
' File : ConstGen.vb Data : 10.04.17 Versione : 1.8d1
|
|
' Contenuto : Modulo costanti generali.
|
|
'
|
|
'
|
|
'
|
|
' Modifiche : 10.04.17 DS Creazione modulo.
|
|
'
|
|
'
|
|
'----------------------------------------------------------------------------
|
|
|
|
Public Module ConstWindow
|
|
|
|
Public Enum AreaTypes
|
|
NULL = 0
|
|
FRAME = 1
|
|
SASH = 2
|
|
FILL = 3
|
|
SPLIT = 4
|
|
SPLITTED = 5
|
|
End Enum
|
|
|
|
Public Enum FillTypes
|
|
NULL = 0
|
|
GLASS = 1
|
|
WOOD = 2
|
|
End Enum
|
|
|
|
Public Enum Shapes As Integer
|
|
RECTANGLE = 1
|
|
RIGHTCHAMFER = 2
|
|
LEFTCHAMFER = 3
|
|
DOUBLECHAMFER = 4
|
|
ARC = 11
|
|
ARC_FULL = 12
|
|
FILLET = 13
|
|
DOUBLEARC = 14
|
|
TRIANGLE = 21
|
|
CUSTOM = 100
|
|
End Enum
|
|
|
|
Public Enum SplitShapes As Integer
|
|
NULL = 0
|
|
VERTICAL = 1
|
|
HORIZONTAL = 2
|
|
GRID = 3
|
|
CUSTOM = 100
|
|
End Enum
|
|
|
|
Public Enum Joints As Integer
|
|
ANGLED = 1
|
|
FULL_H = 2
|
|
FULL_V = 3
|
|
End Enum
|
|
|
|
Public Enum SashTypes As Integer
|
|
NULL = 0
|
|
ACTIVE = 1
|
|
INACTIVE = 2
|
|
ACTIVE_IN = 3
|
|
ACTIVE_OUT = 4
|
|
INACTIVE_IN = 5
|
|
INACTIVE_OUT = 6
|
|
End Enum
|
|
|
|
Public Enum Openings As Integer
|
|
NULL = 0
|
|
TURNONLY_LEFT = 1
|
|
TURNONLY_RIGHT = 2
|
|
TILTTURN_LEFT = 3
|
|
TILTTURN_RIGHT = 4
|
|
TILTONLY_TOP = 5
|
|
TILTONLY_BOTTOM = 6
|
|
PIVOT = 7
|
|
FIXED = 8
|
|
COMPLANARSLIDE_LEFT = 9
|
|
COMPLANARSLIDE_RIGHT = 10
|
|
LIFTSLIDE_LEFT = 11
|
|
LIFTSLIDE_RIGHT = 12
|
|
End Enum
|
|
|
|
Public Enum OpeningTypes As Integer
|
|
NULL = 0
|
|
TURNONLY = 1
|
|
TILTTURN = 2
|
|
TILTONLY = 3
|
|
PIVOT = 4
|
|
FIXED = 5
|
|
COMPLANARSLIDE = 6
|
|
LIFTSLIDE = 7
|
|
End Enum
|
|
|
|
Public Enum OpeningSides As Integer
|
|
NULL = 0
|
|
LEFT = 1
|
|
RIGHT = 2
|
|
End Enum
|
|
|
|
'------------ LUA ------------------
|
|
|
|
Public Enum LuaAreaTypes
|
|
NULL = 0
|
|
FRAME = 1
|
|
SASH = 2
|
|
FILL = 3
|
|
SPLIT = 4
|
|
End Enum
|
|
|
|
Public Enum LuaSplitTypes
|
|
NULL = 0
|
|
MULLION = 1
|
|
FRENCH = 2
|
|
End Enum
|
|
|
|
Public Enum LuaShapes
|
|
RECT = 1
|
|
CHAMFER_SIDE = 2
|
|
CHAMFER = 3
|
|
ROUND_ARC = 4
|
|
SEGMENTAL_ARC = 5
|
|
POINTED_ARC = 6
|
|
TRIANGLE = 7
|
|
End Enum
|
|
|
|
Public Const WIN_OUTLINE As String = "Outline"
|
|
Public Const WIN_AREA As String = "Area"
|
|
Public Const WIN_AREATYPE As String = "AreaType"
|
|
Public Const WIN_SELECTION As String = "Selection"
|
|
|
|
'------------ LUA ------------------
|
|
|
|
Public Const LUA_WIN_SPLITSELECTION As String = "SplitSelection"
|
|
Public Const LUA_WIN_SPLIT As String = "Split"
|
|
Public Const LUA_WIN_SPLITTYPE As String = "SplitType"
|
|
Public Const LUA_WIN_ORIGSPLIT As String = "OrigSplit"
|
|
Public Const LUA_WIN_HDW_FAVOURITE As String = "HdwFavourite"
|
|
Public Const LUA_WIN_HDW_HANDLE As String = "HdwHandle"
|
|
Public Const LUA_WIN_HDW_OPTIONS As String = "HdwOptions"
|
|
|
|
End Module
|