Imports Infragistics.Shared
Imports Infragistics.Win
Imports Infragistics.Win.UltraWinGrid
Private Sub UltraGrid1_InitializeLayout(ByVal sender As Object, ByVal e As Infragistics.Win.UltraWinGrid.InitializeLayoutEventArgs) Handles UltraGrid1.InitializeLayout
' Setup the layout.
e.Layout.Override.CellAppearance.BackColor = Color.LightYellow
e.Layout.ViewStyleBand = ViewStyleBand.OutlookGroupBy
End Sub
Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles button1.Click
' Save the layout to a file.
Me.UltraGrid1.DisplayLayout.SaveAsXml("c:\\test.xml")
End Sub
Private Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles button2.Click
' Reset the layout.
Me.UltraGrid1.DisplayLayout.Reset()
End Sub
Private Sub Button3_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles button3.Click
' Load the saved layout.
Me.UltraGrid1.DisplayLayout.LoadFromXml("c:\\test.xml")
End Sub