Imports Infragistics.Win
Imports Infragistics.Win.UltraWinTabs
Imports Infragistics.Win.UltraWinTabbedMdi
Private Sub ultraTabbedMdiManager1_StoreTab(ByVal sender As Object, ByVal e As Infragistics.Win.UltraWinTabbedMdi.StoreTabEventArgs) Handles ultraTabbedMdiManager1.StoreTab
' The 'StoreTab' event is invoked when the SaveAsXml or
' SaveAsBinary method is invoked. It is a convenient place
' to initialize the 'PersistedInfo' property of the tabs
' immediately prior to serialization and is invoked once for
' each MdiTab in the TabGroups and in the HiddenTabs. This
' will prevent the need to keep updating the PersistedInfo
' at other points when the information needed to deserialize
' the tab changes - e.g. when the file name of the associated
' form changes.
If TypeOf e.Tab.Form Is EditForm Then
e.Tab.PersistedInfo = (CType(e.Tab.Form, EditForm)).FileName
Else
e.Tab.PersistedInfo = e.Tab.Form.Text
End If
End Sub