58 lines
1.3 KiB
VB.net
58 lines
1.3 KiB
VB.net
Imports System
|
|
Imports System.ComponentModel
|
|
Imports DevExpress.Xpo
|
|
Imports DevExpress.Data.Filtering
|
|
Imports DevExpress.ExpressApp
|
|
|
|
Imports DevExpress.Persistent.Base
|
|
Imports DevExpress.Persistent.BaseImpl
|
|
Imports DevExpress.Persistent.Validation
|
|
Imports DevExpress.Xpo.Metadata
|
|
Imports System.Drawing
|
|
Public Enum eWindowDirection
|
|
NotSet = -1
|
|
ToStreet = 0
|
|
ToCourtyard = 1
|
|
End Enum
|
|
Public Enum eIDirection
|
|
NotSet = -1
|
|
North = 0
|
|
East = 1
|
|
South = 2
|
|
West = 3
|
|
NorthEast = 4
|
|
SouthEast = 5
|
|
SouthWest = 6
|
|
NorthWest = 7
|
|
End Enum
|
|
Public Enum eRoomCount
|
|
eNone = 0
|
|
eHalf = 1
|
|
eNormal = 2
|
|
End Enum
|
|
Public Enum eImmovablesTypes
|
|
eApartment = 0
|
|
eOffice = 1
|
|
eContainer = 2
|
|
eGarage = 3
|
|
eStudentHostel = 4
|
|
End Enum
|
|
Public Enum eImmovableSoldState
|
|
eFree = 0 'Szabad
|
|
eAdvanceMoney = 1 'Opciós foglalás
|
|
eMemorandum = 2 'Szándéknyilatkozat
|
|
ePreliminary = 3 'Előszerződés
|
|
eSold = 4 ' Eladva, végszerződés aláírva
|
|
ePossession = 5 'Birtokbaadva
|
|
eOutOfOrder = 6 'Nem értékesíthető
|
|
End Enum
|
|
Public Enum eImmovablesRentState
|
|
eFree = 0 'Szabad bérelhető
|
|
eAdvancedMoney = 1 'Opciós foglalva
|
|
eLease = 2 'Bérleti szerződés alatt
|
|
eRentPassing = 3 'Bérbeadva
|
|
eLeaseBack = 4 'Bérbeadásból visszavonás alatt
|
|
eOutOfOrder = 5 'Nem adható bérbe
|
|
End Enum
|
|
|