27 lines
817 B
VB.net
27 lines
817 B
VB.net
Imports Microsoft.VisualBasic
|
|
Imports System
|
|
Imports DevExpress.ExpressApp
|
|
Imports DevExpress.Persistent.Base
|
|
Imports DevExpress.ExpressApp.Editors
|
|
|
|
|
|
Public Class MasterModificationsControllerBase
|
|
Inherits ViewController
|
|
Public Sub New()
|
|
TargetViewType = ViewType.DetailView
|
|
TargetViewNesting = Nesting.Root
|
|
End Sub
|
|
Protected Overrides Sub OnActivated()
|
|
MyBase.OnActivated()
|
|
|
|
'For Each lpe As ListPropertyEditor In (CType(View, DetailView)).GetItems(Of ListPropertyEditor)()
|
|
' For Each c As Controller In lpe.Frame.Controllers
|
|
' If TypeOf c Is IMasterDetailViewInfo Then
|
|
' CType(c, IMasterDetailViewInfo).AssignMasterDetailViewId(View.Id)
|
|
' End If
|
|
' Next c
|
|
'Next lpe
|
|
End Sub
|
|
End Class
|
|
|