hi, i'm create a RadDock dynamically of this form:
Protected Function creardock() As RadDock
Dim newdock As New RadDock
newdock.UniqueName = Guid.NewGuid().ToString().Replace("-", "a")
newdock.ID = String.Format("RD{0}", newdock.UniqueName)
newdock.EnableAnimation = True
newdock.EnableDrag = True
newdock.DockMode = DockMode.Docked
newdock.DockHandle = DockHandle.Grip
newdock.Resizable = False
newdock.Width = Unit.Percentage(50)
newdock.AutoPostBack = True
newdock.Collapsed = False
newdock.Skin = "Black"
AddHandler newdock.DockPositionChanged, New DockPositionChangedEventHandler(AddressOf RadDock_DockPositionChanged)
Return newdock
End Function
this is a function that i need register for each raddock created:
Protected Sub RadDock_DockPositionChanged(ByVal sender As Object, ByVal e As DockPositionChangedEventArgs)
Dim docksel As RadDock = DirectCast(sender, RadDock)
docksel.DockZoneID = e.DockZoneID
docksel.Index = e.Index
lbl.Text = "dock_zone_obj: " & docksel.DockZoneID & " - dock_zone_des: " & e.DockZoneID & "<br />" & _
"dock_index_obj: " & docksel.Index & " - dock_index_des: " & e.Index
End Sub
Each raddock that is returned for the function creardock(), i need add to a raddockzone that too is created dynamically, the problem is that the event RadDock_DockPositionChanged not being registered, the addition to the raddockzone is as follows:
Dim mizona As RadDockZone = crearradzone()
Dim midock As RadDock = creardock()
mizona.Controls.Add(midock)
this is the function that return the new raddockzone
Protected Function crearradzone() As RadDockZone
Dim newraddockzone As New RadDockZone()
newraddockzone.MinWidth = Unit.Percentage(98)
Return newraddockzone
End Function
note that the creation of the Raddockzone and the Raddock depend on a dynamic creation of tables rows and columns have many records in a DB, the only fixed in the file .aspx is a RadDockLayout and a panel which I add the table or tables dynamically created
help me, i need know if there is any mistake in any function in my code, thanks.
Protected Function creardock() As RadDock
Dim newdock As New RadDock
newdock.UniqueName = Guid.NewGuid().ToString().Replace("-", "a")
newdock.ID = String.Format("RD{0}", newdock.UniqueName)
newdock.EnableAnimation = True
newdock.EnableDrag = True
newdock.DockMode = DockMode.Docked
newdock.DockHandle = DockHandle.Grip
newdock.Resizable = False
newdock.Width = Unit.Percentage(50)
newdock.AutoPostBack = True
newdock.Collapsed = False
newdock.Skin = "Black"
AddHandler newdock.DockPositionChanged, New DockPositionChangedEventHandler(AddressOf RadDock_DockPositionChanged)
Return newdock
End Function
this is a function that i need register for each raddock created:
Protected Sub RadDock_DockPositionChanged(ByVal sender As Object, ByVal e As DockPositionChangedEventArgs)
Dim docksel As RadDock = DirectCast(sender, RadDock)
docksel.DockZoneID = e.DockZoneID
docksel.Index = e.Index
lbl.Text = "dock_zone_obj: " & docksel.DockZoneID & " - dock_zone_des: " & e.DockZoneID & "<br />" & _
"dock_index_obj: " & docksel.Index & " - dock_index_des: " & e.Index
End Sub
Each raddock that is returned for the function creardock(), i need add to a raddockzone that too is created dynamically, the problem is that the event RadDock_DockPositionChanged not being registered, the addition to the raddockzone is as follows:
Dim mizona As RadDockZone = crearradzone()
Dim midock As RadDock = creardock()
mizona.Controls.Add(midock)
this is the function that return the new raddockzone
Protected Function crearradzone() As RadDockZone
Dim newraddockzone As New RadDockZone()
newraddockzone.MinWidth = Unit.Percentage(98)
Return newraddockzone
End Function
note that the creation of the Raddockzone and the Raddock depend on a dynamic creation of tables rows and columns have many records in a DB, the only fixed in the file .aspx is a RadDockLayout and a panel which I add the table or tables dynamically created
help me, i need know if there is any mistake in any function in my code, thanks.