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 _ Public Class ProjectRowsSubcontractor Inherits BaseObject Private _ProjectRows As ProjectRows Private _Subcontractor As Subcontractor Public Sub New(ByVal session As Session) MyBase.New(session) End Sub Public Overrides Sub AfterConstruction() MyBase.AfterConstruction() End Sub _ Property ProjectRows As ProjectRows Get Return _ProjectRows End Get Set(value As ProjectRows) SetPropertyValue("ProjectRows", _ProjectRows, value) End Set End Property Property Subcontractor As Subcontractor Get Return _Subcontractor End Get Set(value As Subcontractor) SetPropertyValue("Subcontractor", _Subcontractor, value) End Set End Property End Class