Imports DevExpress.Xpo Imports DevExpress.Persistent.Base _ _ Public Class CustomersOrder ' Ez azokat a partnereket tartalmazza, akik rendelkeznek elég infóval, hogy rendeljünk tőlük Inherits Customers Public Sub New(ByVal session As Session) MyBase.New(session) End Sub _ _ Public ReadOnly Property CustomersOrderDocuments() As XPCollection(Of CustomersOrderDocuments) Get Return GetCollection(Of CustomersOrderDocuments)("CustomersOrderDocuments") End Get End Property End Class