In the following section, defines how the Sheridan controls are upgraded.
Sheridan controls (now Infragistics) were a set of components widely used in VB6 that provided some functionality not present in the built-in VB6 controls. Since these controls are so widely used Mobilize has added support for the most common of them.
The mappings created by Mobilize for these controls change some of them to equivalent third-party components in .NET or standard .NET controls. As usual, there’s also the possibility to continue using the ActiveX controls through COM Interop.
1. SSActiveTabPanel
1.1. To System.Windows.Forms.TabControl
Map UltraToolBars' SSActiveTabPanel classes to Windows Forms equivalents.
Private Sub Form_Load()
Dim newActiveTabs As ActiveTabs.SSActiveTabs
Set newActiveTabs = SSActiveTabs1
newActiveTabs.AddControl SSActiveTabPanel1
MsgBox newActiveTabs.Caption
End Sub
Private Sub Form_Load()
Dim newActiveTabs As TabControl = SSActiveTabs1
newActiveTabs.Controls.Add(SSActiveTabPanel1)
MessageBox.Show(newActiveTabs.Name, My.Application.Info.Title)
End Sub
1.2. To COM Interop
This feature will take the legacy COM control and create an interoperability code wrapper to make it visible from the managed code. This means the control's functionality will remain the same since it will use the same binary, but the resulting application will depend on the legacy control.
Original VB6 code:
Private Sub Form_Load()
Dim newActiveTabs As ActiveTabs.SSActiveTabs
Set newActiveTabs = SSActiveTabs1
newActiveTabs.AddControl SSActiveTabPanel1
MsgBox newActiveTabs.Caption
End Sub
Private Sub Form_Load()
Dim newActiveTabs As AxActiveTabs.AxSSActiveTabs = SSActiveTabs1
newActiveTabs.AddControl(SSActiveTabPanel1)
MessageBox.Show(newActiveTabs.Text, My.Application.Info.Title)
End Sub
2. SSActiveToolBars
2.1. To System.Windows.Forms.ToolStrip
Convert ActiveToolBars.SSActiveToolBars classes to System.Windows.Forms.ToolStrip.
By using this option the converted application will not have any reference to the COM Component.
Class
Maps to
ActiveToolBars.SSActiveToolBars.Enabled
System.Windows.Forms.ToolStrip.Enabled
ActiveToolBars.SSActiveToolBars.ToolBars
System.Windows.Forms.ToolStrip.ToolBars
ActiveToolBars.SSActiveToolBars.BackColor
System.Windows.Forms.ToolStrip.BackColor
ActiveToolBars.SSActiveToolBars.ForeColor
System.Windows.Forms.ToolStrip.ForeColor
ActiveToolBars.SSActiveToolBars.Name
System.Windows.Forms.ToolStrip.Name
ActiveToolBars.SSActiveToolBars.Visible
System.Windows.Forms.ToolStrip.Visible
ActiveToolBars.SSActiveToolBars.Left
System.Windows.Forms.ToolStrip.Left
ActiveToolBars.SSActiveToolBars.Top
System.Windows.Forms.ToolStrip.Top
Original VB6 code:
Private Sub Form_Load()
...
Dim tool1 As SSTool
Set tool1 = SSActiveToolBars1.Tools("ID_Label1")
SSActiveToolBars1.Tools("ID_Label1").ToolTipText = "Label Renamed tooltiptext"
str1 = UCase$(SSActiveToolBars1.Tools("ID_Label1").ToolTipText)
SSActiveToolBars1.Tools("ID_Button1").Visible = bool
Me.SSActiveToolBars1.Tools("ID_Button1").Visible = Not bool
With SSActiveToolBars1
.Tools("ID_Button1").Visible = False
.Tools("ID_Button1").Visible = True
End With
bool = SSActiveToolBars1.Enabled
SSActiveToolBars1.Enabled = True
SSActiveToolBars1.Enabled = False
SSActiveToolBars1.Enabled = bool
SSActiveToolBars1.Visible = True
SSActiveToolBars1.Left = 450
SSActiveToolBars1.Top = 300
End Sub
Private Sub Form_Load()
Dim bool As Boolean
Dim tool1 As ToolStripItem = SSActiveToolBars1.Items.Item("ID_Label1")
SSActiveToolBars1.Items.Item("ID_Label1").ToolTipText = "Label Renamed tooltiptext"
Dim str1 As String = SSActiveToolBars1.Items.Item("ID_Label1").ToolTipText.ToUpper()
SSActiveToolBars1.Items.Item("ID_Button1").Visible = bool
Me.SSActiveToolBars1.Items.Item("ID_Button1").Visible = Not bool
With SSActiveToolBars1
.Items.Item("ID_Button1").Visible = False
.Items.Item("ID_Button1").Visible = True
End With
bool = SSActiveToolBars1.Enabled
SSActiveToolBars1.Enabled = True
SSActiveToolBars1.Enabled = False
SSActiveToolBars1.Enabled = bool
SSActiveToolBars1.Visible = True
SSActiveToolBars1.Left = 450
SSActiveToolBars1.Top = 300
End Sub
2.2. To COM Interop
This feature will take the legacy COM control and create an interoperability code wrapper to make it visible from the managed code. This means the control's functionality will remain the same since it will use the same binary, but the resulting application will depend on the legacy control.
Original VB6 code:
Private Sub Form_Load()
...
Dim tool1 As SSTool
Set tool1 = SSActiveToolBars1.Tools("ID_Label1")
SSActiveToolBars1.Tools("ID_Label1").ToolTipText = "Label Renamed tooltiptext"
str1 = UCase$(SSActiveToolBars1.Tools("ID_Label1").ToolTipText)
SSActiveToolBars1.Tools("ID_Button1").Visible = bool
Me.SSActiveToolBars1.Tools("ID_Button1").Visible = Not bool
With SSActiveToolBars1
.Tools("ID_Button1").Visible = False
.Tools("ID_Button1").Visible = True
End With
bool = SSActiveToolBars1.Enabled
SSActiveToolBars1.Enabled = True
SSActiveToolBars1.Enabled = False
SSActiveToolBars1.Enabled = bool
SSActiveToolBars1.Visible = True
SSActiveToolBars1.Left = 450
SSActiveToolBars1.Top = 300
End Sub
Private Sub Form_Load()
Dim bool As Boolean
Dim tool1 As ActiveToolBars.SSTool = SSActiveToolBars1.Tools.Item("ID_Label1")
SSActiveToolBars1.Tools.Item("ID_Label1").ToolTipText = "Label Renamed tooltiptext"
Dim str1 As String = SSActiveToolBars1.Tools.Item("ID_Label1").ToolTipText.ToUpper()
...
SSActiveToolBars1.Tools.Item("ID_Button1").Visible = bool
Me.SSActiveToolBars1.Tools.Item("ID_Button1").Visible = Not bool
With SSActiveToolBars1
.Tools.Item("ID_Button1").Visible = False
.Tools.Item("ID_Button1").Visible = True
End With
bool = SSActiveToolBars1.Enabled
SSActiveToolBars1.Enabled = True
SSActiveToolBars1.Enabled = False
SSActiveToolBars1.Enabled = bool
SSActiveToolBars1.Visible = True
SSActiveToolBars1.Left = 30
SSActiveToolBars1.Top = 20
End Sub
3. SSActiveTreeView
3.1. To System.Windows.Forms.TreeView
Converts Sheridan’s SSActiveTreeView control to .NET native library.
This option converts Sheridan SSActiveTreeView to .NET native control.
The Sheridan SSActiveTreeView is a 32-bit only product that consists of a TreeView control and related classes and enums.
public System.Windows.Forms.TreeView SSTree1;
...
private void InitializeComponent(){
...
this.SSTree1 = new System.Windows.Forms.TreeView();
this.SSTree1.Location = new System.Drawing.Point(232, 208);
this.SSTree1.Name = "SSTree1";
this.SSTree1.Size = new System.Drawing.Size(209, 129);
this.SSTree1.TabIndex = 6;
...
}
VB.NET code:
Public WithEvents SSTree1 As System.Windows.Forms.TreeView
...
Private Sub InitializeComponent()
Me.SSTree1 = New System.Windows.Forms.TreeView
Me.SSTree1.Location = New System.Drawing.Point(232, 208)
Me.SSTree1.Name = "SSTree1"
Me.SSTree1.Size = New System.Drawing.Size(209, 129)
Me.SSTree1.TabIndex = 6
...
End Sub
3.2. To COM Interop
This feature will take the legacy COM control and create an interoperability code wrapper to make it visible from the managed code. This means the control's functionality will remain the same since it will use the same binary, but the resulting application will depend on the legacy control.
Public WithEvents SSTree1 As AxSSActiveTreeView.AxSSTree
...
Private Sub InitializeComponent()
Me.SSTree1 = New AxSSActiveTreeView.AxSSTree
Me.SSTree1.Name = "SSTree1"
Me.SSTree1.OcxState = CType(resources.GetObject("SSTree1.OcxState"), System.Windows.Forms.AxHost.State)
...
End Sub
4. SSCalendarWidgets
4.1. To System.Windows.Forms Controls
Converts Sheridan’s SSCalendarWidgets controls to System.Windows.Forms.
This option converts Sheridan’s SSCalendar controls to the native System.Windows.Forms controls.
General Description:
The Sheridan SSCalendarWidgets library provides a set of controls with an intuitive graphical interface for users to view and set date information: SSDateCombo (control that allows the user to select a single item from a list of dates or times), the SSMonth (grid containing the numbered days of the month, arranged in columns underneath the days of the week, with the selected range of dates highlighted) and the SSYear control.
Deployment Note:
The following list shows which SSCalendarWidgets components are mapped to .NET equivalents:
Class
Maps to
SSCalendarWidgets_A.SSDateCombo
System.Windows.Forms.DateTimePicker
SSCalendarWidgets_A.SSMonth
System.Windows.Forms.MonthCalendar
SSCalendarWidgets_A.SSYear
System.Windows.Forms.MonthCalendar
SSCalendarWidgets_A.Constants.StartOfWeek
System.Windows.Forms.Day
Original VB6 code:
Begin SSCalendarWidgets_A.SSYear SSYear1
...
Caption = "SSYear1"
BeginProperty DayFont {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "Small Fonts"
...
Strikethrough = 0 'False
EndProperty
End
Begin SSCalendarWidgets_A.SSDateCombo SSDateCombo1
_Version = 65543
End
Begin SSCalendarWidgets_A.SSMonth SSMonth1
_Version = 65543
End
C# code:
public System.Windows.Forms.MonthCalendar SSYear1;
public System.Windows.Forms.DateTimePicker SSDateCombo1;
public System.Windows.Forms.MonthCalendar SSMonth1;
private void InitializeComponent(){
this.SSYear1 = new System.Windows.Forms.MonthCalendar();
this.SSDateCombo1 = new System.Windows.Forms.DateTimePicker();
this.SSMonth1 = new System.Windows.Forms.MonthCalendar();
...
}
VB.NET code:
Public WithEvents SSYear1 As System.Windows.Forms.MonthCalendar
Public WithEvents SSDateCombo1 As System.Windows.Forms.DateTimePicker
Public WithEvents SSMonth1 As System.Windows.Forms.MonthCalendar
Private Sub InitializeComponent()
Me.SSYear1 = New System.Windows.Forms.MonthCalendar
Me.SSDateCombo1 = New System.Windows.Forms.DateTimePicker
Me.SSMonth1 = New System.Windows.Forms.MonthCalendar
...
4.2. To COM Interop
This feature will take the legacy COM control and create an interoperability code wrapper to make it visible from the managed code. This means the control's functionality will remain the same since it will use the same binary, but the resulting application will depend on the legacy control.
Original VB6 code:
Begin SSCalendarWidgets_A.SSYear SSYear1
...
Caption = "SSYear1"
BeginProperty DayFont {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "Small Fonts"
...
Strikethrough = 0 'False
EndProperty
End
Begin SSCalendarWidgets_A.SSDateCombo SSDateCombo1
_Version = 65543
End
Begin SSCalendarWidgets_A.SSMonth SSMonth1
_Version = 65543
End
C# code:
public AxSSCalendarWidgets_A.AxSSYear SSYear1;
public AxSSCalendarWidgets_A.AxSSDateCombo SSDateCombo1;
public AxSSCalendarWidgets_A.AxSSMonth SSMonth1;
private void InitializeComponent(){
this.SSYear1 = new AxSSCalendarWidgets_A.AxSSYear();
this.SSDateCombo1 = new AxSSCalendarWidgets_A.AxSSDateCombo();
this.SSMonth1 = new AxSSCalendarWidgets_A.AxSSMonth();
...
}
VB.NET code:
Public WithEvents SSYear1 As AxSSCalendarWidgets_A.AxSSYear
Public WithEvents SSDateCombo1 As AxSSCalendarWidgets_A.AxSSDateCombo
Public WithEvents SSMonth1 As AxSSCalendarWidgets_A.AxSSMonth
Private Sub InitializeComponent()
Me.SSYear1 = New AxSSCalendarWidgets_A.AxSSYear
Me.SSDateCombo1 = New AxSSCalendarWidgets_A.AxSSDateCombo
Me.SSMonth1 = New AxSSCalendarWidgets_A.AxSSMonth
...
5. SSDataWidgets_B
5.1. To ComponentOne (.NET version)
Converts Sheridan’s SSDataWidgets controls to Component One .NET equivalents.
This option removes the usage of the legacy COM component.
General Description:
The Sheridan SSDataWidgets is an ActiveX library that contains the SSDBGrid, SSDBDropDown and more controls that display and manage data in a tabular fashion.
Deployment Note:
The following list shows which SSDataWidgets components are mapped to Component One .NET equivalents:
Class
Maps to
ISSColumns
C1.Win.C1TrueDBGrid.C1DataColumnCollection
Constants_RelocateISSStyleSets
C1.Win.C1TrueDBGrid.C1WinTrueDBG
SSDBDropDown
C1.Win.C1TrueDBGrid.C1TrueDBDropDown
ISSColumn
C1.Win.C1TrueDBGrid.C1DataColumn
SSDBGrid
C1.Win.C1TrueDBGrid.C1TrueDBGrid
Constants_CaptionAlignment
C1.Win.C1TrueDBGrid.AlignHorzEnum
Constants_ColumnCaptionAlignment
C1.Win.C1TrueDBGrid.AlignHorzEnum
Constants_BorderStyle
System.Windows.Forms.BorderStyle
Original VB6 code:
Begin SSDataWidgets_B.SSDBDropDown SSDBDropDown1
...
End
Begin SSDataWidgets_B.SSDBCombo SSDBCombo1
...
End
Begin SSDataWidgets_B.SSDBGrid SSDBGrid1
...
Caption = "SSDBGrid1"
...
End
C# code:
public C1.Win.C1TrueDBGrid.C1TrueDBDropDown SSDBDropDown1;
public C1.Win.C1TrueDBGrid.C1TrueDBGrid SSDBGrid1;
...
private void InitializeComponent(){
...
this.SSDBDropDown1 = new C1.Win.C1TrueDBGrid.C1TrueDBDropDown();
this.SSDBGrid1 = new C1.Win.C1TrueDBGrid.C1TrueDBGrid();
...
}
VB.NET code:
Public WithEvents SSDBDropDown1 As C1.Win.C1TrueDBGrid.C1TrueDBDropDown
Public WithEvents SSDBGrid1 As C1.Win.C1TrueDBGrid.C1TrueDBGrid
...
Private Sub InitializeComponent()
Me.SSDBDropDown1 = New C1.Win.C1TrueDBGrid.C1TrueDBDropDown
Me.SSDBGrid1 = New C1.Win.C1TrueDBGrid.C1TrueDBGrid
...
End Sub
5.2. To Infragistics UltraSuite (.NET version)
Converts Sheridan’s SSDataWidgets controls to Infragistics .NET equivalent controls.
This option converts SSDataWidgets controls to Infragistics.Win.UltraWinGrid.
General Description:
The Sheridan SSDataWidgets is an ActiveX library that contains the SSDBGrid, SSDBDropDown and SSDBCombo and more controls that display and manage data in a tabular fashion.
Deployment Note:
The following list shows which SSDataWidgets components are mapped to Infragistics .NET equivalents:
Class
Maps to
Constants_Relocate
Infragistics.Win.UltraWinGrid.AllowColSwapp
ISSActiveCell
Infragistics.Win.UltraWinGrid.UltraGridCell
ISSColumn
Infragistics.Win.UltraWinGrid.UltraGridColum
ISSColumns
Infragistics.Win.UltraWinGrid.ColumnsCollection
ISSStyleSets
Infragistics.Win.AppearancesCollection
SSDBCombo
Infragistics.Win.UltraWinGrid.UltraCombo
SSDBDropDown
Infragistics.Win.UltraWinGrid.UltraDropDown
SSDBGrid
Infragistics.Win.UltraWinGrid.UltraGrid
Constants_CaptionAlignment
Infragistics.Win.HAlign
Constants_ColumnCaptionAlignment
Infragistics.Win.HAlign
Constants_TabNavigation
Infragistics.Win.UltraWinGrid.TabNavigation
Constants_BorderStyle
Infragistics.Win.UIElementBorderStyle
Constants_ScrollBarsStyle
Infragistics.Win.UltraWinGrid.Scrollbars
Original VB6 code:
Begin SSDataWidgets_B.SSDBDropDown SSDBDropDown1
...
End
Begin SSDataWidgets_B.SSDBCombo SSDBCombo1
...
End
Begin SSDataWidgets_B.SSDBGrid SSDBGrid1
...
Caption = "SSDBGrid1"
...
End
C# code:
public Infragistics.Win.UltraWinGrid.UltraGridColumn Column_0_SSDBDropDown1;
public Infragistics.Win.UltraWinGrid.UltraDropDown SSDBDropDown1;
public Infragistics.Win.UltraWinGrid.UltraCombo SSDBCombo1;
public Infragistics.Win.UltraWinGrid.UltraGridColumn Column_0_SSDBGrid1;
public Infragistics.Win.UltraWinGrid.UltraGrid SSDBGrid1;
...
private void InitializeComponent(){
...
this.SSDBDropDown1 = new Infragistics.Win.UltraWinGrid.UltraDropDown();
this.Column_0_SSDBDropDown1 = new Infragistics.Win.UltraWinGrid.UltraGridColumn();
this.SSDBCombo1 = new Infragistics.Win.UltraWinGrid.UltraCombo();
this.SSDBGrid1 = new Infragistics.Win.UltraWinGrid.UltraGrid();
this.Column_0_SSDBGrid1 = new Infragistics.Win.UltraWinGrid.UltraGridColumn();
...
}
VB.NET code:
Public WithEvents Column_0_SSDBDropDown1 As Infragistics.Win.UltraWinGrid.UltraGridColumn
Public WithEvents SSDBDropDown1 As Infragistics.Win.UltraWinGrid.UltraDropDown
Public WithEvents SSDBCombo1 As Infragistics.Win.UltraWinGrid.UltraCombo
Public WithEvents Column_0_SSDBGrid1 As Infragistics.Win.UltraWinGrid.UltraGridColumn
Public WithEvents SSDBGrid1 As Infragistics.Win.UltraWinGrid.UltraGrid
...
Private Sub InitializeComponent()
Me.SSDBDropDown1 = New Infragistics.Win.UltraWinGrid.UltraDropDown
Me.SSDBCombo1 = New Infragistics.Win.UltraWinGrid.UltraCombo
Me.SSDBGrid1 = New Infragistics.Win.UltraWinGrid.UltraGrid
Me.Column_0_SSDBGrid1 = New Infragistics.Win.UltraWinGrid.UltraGridColumn
Me.Column_0_SSDBDropDown1 = New Infragistics.Win.UltraWinGrid.UltraGridColumn
...
End
5.3. To COM Interop
This feature will take the legacy COM control and create an interoperability code wrapper to make it visible from the managed code. This means the control's functionality will remain the same since it will use the same binary, but the resulting application will depend on the legacy control.
Original VB6 code:
Begin SSDataWidgets_B.SSDBDropDown SSDBDropDown1
...
End
Begin SSDataWidgets_B.SSDBCombo SSDBCombo1
...
End
Begin SSDataWidgets_B.SSDBGrid SSDBGrid1
...
Caption = "SSDBGrid1"
...
End
C# code:
public AxSSDataWidgets_B.AxSSDBDropDown SSDBDropDown1;
public AxSSDataWidgets_B.AxSSDBCombo SSDBCombo1;
public AxSSDataWidgets_B.AxSSDBGrid SSDBGrid1;
...
private void InitializeComponent(){
...
this.SSDBDropDown1 = new AxSSDataWidgets_B.AxSSDBDropDown();
this.SSDBCombo1 = new AxSSDataWidgets_B.AxSSDBCombo();
this.SSDBGrid1 = new AxSSDataWidgets_B.AxSSDBGrid();
...
}
VB.NET code:
Public WithEvents SSDBDropDown1 As AxSSDataWidgets_B.AxSSDBDropDown
Public WithEvents SSDBCombo1 As AxSSDataWidgets_B.AxSSDBCombo
Public WithEvents SSDBGrid1 As AxSSDataWidgets_B.AxSSDBGrid
...
Private Sub InitializeComponent()
Me.SSDBDropDown1 = New AxSSDataWidgets_B.AxSSDBDropDown
Me.SSDBCombo1 = New AxSSDataWidgets_B.AxSSDBCombo
Me.SSDBGrid1 = New AxSSDataWidgets_B.AxSSDBGrid
...
End Sub
6. SSDesignerWidgetsTabs
6.1. To System.Windows.Forms.TabControl
Converts Sheridan’s SSDesignerWidgetsTabs control to a .NET native library.
This option removes the dependency on the legacy COM control.
General Description:
The Sheridan SSDesignerWidgetsTabs is an ActiveX library that contains several visual controls. The SSIndexTab contains Tab items which in turn contain controls displayed when the Tab is selected. Although the controls are placed on a Tab at design time, they are actually stored on a page of that Tab designated as page zero. This page is unique and it cannot be removed.
Deployment Note:
The following list shows which SSDesignerWidgetsTabs components are mapped to .NET equivalents:
Class
Maps to
SSDesignerWidgetsTabs.SSIndexTab
System.Windows.Forms.TabControl
SSDesignerWidgetsTabs.CTab
System.Windows.Forms.TabPage
SSDesignerWidgetsTabs.CTabs
System.Windows.Forms.TabControl.TabPageCollection
SSDesignerWidgetsTabs.Constants_TabOrientation
System.Windows.Forms.TabAlignment
6.2. To COM Interop
This feature will take the legacy COM control and create an interoperability code wrapper to make it visible from the managed code. This means the control's functionality will remain the same since it will use the same binary, but the resulting application will depend on the legacy control.
Original VB6 code:
Begin SSDesignerWidgetsTabs.SSIndexTab SSIndexTab1
...
BeginProperty FontSub {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "MS Sans Serif"
...
EndProperty
BeginProperty PageFont {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "MS Sans Serif"
...
EndProperty
BeginProperty ActiveTabFont {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "MS Sans Serif"
...
EndProperty
BeginProperty ActivePageFont {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "MS Sans Serif"
...
EndProperty
End
Public WithEvents SSIndexTab1 As AxSSDesignerWidgetsTabs.AxSSIndexTab
...
Private Sub InitializeComponent()
....
Me.SSIndexTab1 = New AxSSDesignerWidgetsTabs.AxSSIndexTab
CType(Me.SSIndexTab1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SSIndexTab1.Name = "SSIndexTab1"
Me.SSIndexTab1.OcxState = CType(resources.GetObject("SSIndexTab1.OcxState"), System.Windows.Forms.AxHost.State)
...
End Sub
7. SSListBar
7.1. To Infragistics UltraWinListBar.NET Suite
Converts Sheridan’s SSListBar controls to Infragistics UltraWinListBar.NET controls.
This option converts Sheridan SSListBar control to Infragistics UltraWinListBar.NET.
General Description:
The Sheridan ActiveListBar is a navigation control that gives applications an appearance similar to that of Microsoft Outlook. It incorporates a system of sliding Groups, each of which is identified by its header. Clicking a Group's header causes the group to become active, slide into view and display the ListItems it contains.
The ActiveListBar has a single collection of items regardless of the group where they are located. The SSListItem.Index property indicates the position of the item in the collection.
Deployment Note:
The following list shows which SSListBar components are mapped to Infragistics UltraWinListBar.NET Suite equivalents:
Class
Maps to
stBar.SSListBar
Infragistics.Win.UltraWinListBar.UltraListBar
stBar.ISSImagesCollection
System.Windows.Forms.ImageList
stBar.ISSGroupsCollection
Infragistics.Win.UltraWinListBar.GroupsCollection
stbar.Constants_BorderStyle
Infragistics.Win.UIElementBorderStyle
stbar.Constants_Style
Infragistics.Win.UltraWinListBar.Style
stbar.ISSGroup
Infragistics.Win.UltraWinListBar.Group
stbar.Constants_PictureBackgroundStyle
Infragistics.Win.ImageBackgroundStyle
stbar.SSGroup
Infragistics.Win.UltraWinListBar.Group
stbar.ISSListItem
Infragistics.Win.UltraWinListBar.Item
stBar.SSListItem
Infragistics.Win.UltraWinListBar.Item
stBar.SSListItems
Infragistics.Win.UltraWinListBar.ItemsCollection
Original VB6 code:
Begin Listbar.SSListBar SSListBar1
Groups(1).CurrentGroup= -1 'True'
Groups(1).Caption= "New Group"
End
C# code:
public Infragistics.Win.UltraWinListBar.Group Group_1_SSListBar1;
public Infragistics.Win.UltraWinListBar.UltraListBar SSListBar1;
...
private void InitializeComponent(){
...
this.SSListBar1 = new Infragistics.Win.UltraWinListBar.UltraListBar();
this.Group_1_SSListBar1 = new Infragistics.Win.UltraWinListBar.Group();
this.SSListBar1.SuspendLayout();
...
}
VB.NET code:
Public WithEvents Group_1_SSListBar1 AsInfragistics.Win.UltraWinListBar.Group
Public WithEvents SSListBar1 As Infragistics.Win.UltraWinListBar.UltraListBar
...
Private Sub InitializeComponent()
Me.SSListBar1 = New Infragistics.Win.UltraWinListBar.UltraListBar
Me.Group_1_SSListBar1 = New Infragistics.Win.UltraWinListBar.Group
Me.SSListBar1.SuspendLayout()
...
End Sub
7.2. To COM Interop
This feature will take the legacy COM control and create an interoperability code wrapper to make it visible from the managed code. This means the control's functionality will remain the same since it will use the same binary, but the resulting application will depend on the legacy control.
Original VB6 code:
Begin Listbar.SSListBar SSListBar1
Groups(1).CurrentGroup= -1 'True'
Groups(1).Caption= "New Group"
End
C# code:
public AxListbar.AxSSListBar SSListBar1;
...
private void InitializeComponent(){
...
this.SSListBar1 = new AxListbar.AxSSListBar();
((System.ComponentModel.ISupportInitialize)
this.SSListBar1.OcxState = (System.Windows.Forms.AxHost.State) resources.GetObject("SSListBar1.OcxState");
...
}
VB.NET code:
Public WithEvents SSListBar1 As AxListbar.AxSSListBar
...
Private Sub InitializeComponent()
Me.SSListBar1 = New AxListbar.AxSSListBar
CType(Me.SSListBar1, System.ComponentModel.ISupportInitialize).BeginInit(
Me.SSListBar1.OcxState = CType(resources.GetObject("SSListBar1.OcxState"), System.Windows.Forms.AxHost.State)
...
End Sub
8. SSPanels
8.1. On (Empty SSPanel converted to Label)
Convert Threed.SSPanel classes to System.Windows.Forms.Label when the SSPanel doesn't have any other control inside. If it has controls inside, it will be converted to a System.Windows.Forms.Panel.
By using this option the converted application will not have any reference to the COM Component.
Class
Maps to
Threed.SSPanel.Height
System.Windows.Forms.Label.Height
Threed.SSPanel.Width
System.Windows.Forms.Label.Width
Threed.SSPanel.BackColor
System.Windows.Forms.Label.BackColor
Threed.SSPanel.Enabled
System.Windows.Forms.Label.Enabled
Threed.SSPanel.Font
System.Windows.Forms.Label.Font.Name
Threed.SSPanel.ForeColor
System.Windows.Forms.Label.ForeColor
Threed.SSPanel.Refresh
System.Windows.Forms.Label.Refresh
Threed.SSPanel.Tag
System.Windows.Forms.Label.Tag
Original VB6 code:
Private Sub Form_Load()
...
SSPanel1.Tag = "Some Tag"
SSPanel1.Height = 1200
SSPanel1.Width = 900
SSPanel1.Align = 0
X1 = SSPanel1.BackColor
SSPanel1.Enabled = False
Call SSPanel1.Refresh
X2 = SSPanel1.Font
End Sub
Private Sub Form_Load()
SSPanel1.Tag = "Some Tag"
SSPanel1.Height = 80
SSPanel1.Width = 60
SSPanel1.Dock = DockStyle.None
Dim X1 As Color = SSPanel1.BackColor
SSPanel1.Enabled = False
SSPanel1.Refresh()
Dim X2 As String = SSPanel1.Font.Name
End Sub
Partial Class Form1
...
Public WithEvents SSPanel1 As System.Windows.Forms.Label
...
Private Sub InitializeComponent()
...
Me.SSPanel1 = New System.Windows.Forms.Label()
...
8.2. Off
Convert Threed.SSPanel classes to System.Windows.Forms.Panel.
By using this option the converted application will not have any reference to the COM Component.
Class
Maps to
Threed.SSPanel.Height
System.Windows.Forms.Panel.Height
Threed.SSPanel.Width
System.Windows.Forms.Panel.Width
Threed.SSPanel.BackColor
System.Windows.Forms.Panel.BackColor
Threed.SSPanel.Enabled
System.Windows.Forms.Panel.Enabled
Threed.SSPanel.Font
System.Windows.Forms.Panel.Font.Name
Threed.SSPanel.ForeColor
System.Windows.Forms.Panel.ForeColor
Threed.SSPanel.Refresh
System.Windows.Forms.Panel.Refresh
Threed.SSPanel.Tag
System.Windows.Forms.Panel.Tag
Original VB6 code:
Private Sub Form_Load()
...
SSPanel1.Tag = "Some Tag"
SSPanel1.Height = 1200
SSPanel1.Width = 900
SSPanel1.Align = 0
X1 = SSPanel1.BackColor
SSPanel1.Enabled = False
Call SSPanel1.Refresh
X2 = SSPanel1.Font
End Sub
Private Sub Form_Load()
SSPanel1.Tag = "Some Tag"
SSPanel1.Height = 80
SSPanel1.Width = 60
SSPanel1.Dock = DockStyle.None
Dim X1 As Color = SSPanel1.BackColor
SSPanel1.Enabled = False
SSPanel1.Refresh()
Dim X2 As String = SSPanel1.Font.Name
End Sub
Partial Class Form1
...
Public WithEvents SSPanel1 As System.Windows.Forms.Panel
...
Private Sub InitializeComponent()
...
Me.SSPanel1 = New System.Windows.Forms.Panel()
...
9. SSSplitter
9.1. To System.Windows.Forms.SplitContainer
Converts Sheridan’s SSSplitter control to .NET native control.
This option removes the usage of the legacy COM control.
General Description:
The Sheridan SSSplitter is a container control that organizes the controls it contains into “n” resizable panes, which are separated by splitter bars that can be dragged with the mouse.
Deployment Note:
The following list shows which SSSplitter components are mapped to .NET equivalents:
Class
Maps to
SSSplitter.SSSplitter
System.Windows.Forms.SplitContainer
SSSplitter.Constants_SplitterBarAppearance
System.Windows.Forms.BorderStyle
SSSplitter.IPane
System.Windows.Forms.SplitterPanel
SSSplitter.Pane
System.Windows.Forms.SplitterPanel
Original VB6 code:
Begin SSSplitter.SSSplitter SSSplitter1
_Version = 131074
PaneTree = "FormSheridan.frx":0000
End
C# code:
public System.Windows.Forms.SplitContainer SSSplitter1;
...
private void InitializeComponent(){
...
this.SSSplitter1 = new System.Windows.Forms.SplitContainer();
...
}
VB.NET code:
Public WithEvents SSSplitter1 As System.Windows.Forms.SplitContainer
...
Private Sub InitializeComponent()
Me.SSSplitter1 = New System.Windows.Forms.SplitContainer
...
End Sub
9.2. To COM Interop
This feature will take the legacy COM control and create an interoperability code wrapper to make it visible from the managed code. This means the control's functionality will remain the same since it will use the same binary, but the resulting application will depend on the legacy control.
Original VB6 code:
Begin Listbar.SSListBar SSListBar1
Groups(1).CurrentGroup= -1 'True'
Groups(1).Caption= "New Group"
End
C# code:
public AxSSSplitter.AxSSSplitter SSSplitter1;
...
private void InitializeComponent(){
...
this.SSSplitter1 = new AxSSSplitter.AxSSSplitter();
((System.ComponentModel.ISupportInitialize) this.SSSplitter1).BeginInit();
...
}
VB.NET code:
Public WithEvents SSSplitter1 As AxSSSplitter.AxSSSplitter
...
Private Sub InitializeComponent()
Me.SSSplitter1 = New AxSSSplitter.AxSSSplitter
CType(Me.SSSplitter1,System.ComponentModel.ISupportInitialize).Begint()
...
End Sub
10. Threed
10.1. To System.Windows.Forms Controls
Converts Sheridan’s Threed controls to native .NET controls.
This option avoids the usage of legacy COM control.
General Description:
ActiveThreed is a set of 32-bit ActiveX controls: SSCommand (extended command button controls), SSFrame (extended grouping box / frame), SSCheck (extended check selector controls) and SSPanel (extended grouping box / Panel).
Deployment Note:
The following list shows which Threed components are mapped to .NET equivalents:
Class
Maps to
Threed.SSCommand
System.Windows.Forms.Button
Threed.Constants_ButtonStyle
System.Windows.Forms.FlatStyle
Threed.SSFrame
System.Windows.Forms.GroupBox
Threed.SSPanel
System.Windows.Forms.Panel
Threed.SSCheck
System.Windows.Forms.CheckBox
Threed.SSOption
System.Windows.Forms.RadioButton
Threed.Constants_Alignment
System.Drawing.ContentAlignment
Threed.Constants_PictureBackgroundStyle
System.Windows.Forms.ImageLayout
Threed.Constants_Bevel
System.Windows.Forms.BorderStyle
Threed.Constants_MousePointer
System.Windows.Forms.Cursor
Threed.Constants_CheckBoxValue
System.Windows.Forms.CheckState
Original VB6 code:
Begin Threed.SSCommand SSCommand1
Caption = "SSCommand1"
End
Begin Threed.SSFrame SSFrame1
Caption = "SSFrame1"
End
Begin Threed.SSPanel SSPanel1
Caption = "SSPanel1"
End
C# code:
public System.Windows.Forms.Panel SSPanel1;
public System.Windows.Forms.GroupBox SSFrame1;
public System.Windows.Forms.Button SSCommand1;
...
private void InitializeComponent(){
...
this.SSPanel1 = new System.Windows.Forms.Panel();
this.SSFrame1 = new System.Windows.Forms.GroupBox();
this.SSCommand1 = new System.Windows.Forms.Button();
...
}
VB.NET code:
Public WithEvents SSPanel1 As System.Windows.Forms.Panel
Public WithEvents SSFrame1 As System.Windows.Forms.GroupBox
Public WithEvents SSCommand1 As System.Windows.Forms.Button
...
Private Sub InitializeComponent()
Me.SSPanel1 = New System.Windows.Forms.Panel
Me.SSFrame1 = New System.Windows.Forms.GroupBox
Me.SSCommand1 = New System.Windows.Forms.Button
...
End
10.2. To COM Interop
This feature will take the legacy COM control and create an interoperability code wrapper to make it visible from the managed code. This means the control's functionality will remain the same since it will use the same binary, but the resulting application will depend on the legacy control.
Original VB6 code:
Begin Threed.SSCommand SSCommand1
Caption = "SSCommand1"
End
Begin Threed.SSFrame SSFrame1
Caption = "SSFrame1"
End
Begin Threed.SSPanel SSPanel1
Caption = "SSPanel1"
End
C# code:
public AxThreed.AxSSPanel SSPanel1;
public AxThreed.AxSSFrame SSFrame1;
public AxThreed.AxSSCommand SSCommand1;
...
private void InitializeComponent(){
...
this.SSPanel1 = new AxThreed.AxSSPanel();
this.SSFrame1 = new AxThreed.AxSSFrame();
this.SSCommand1 = new AxThreed.AxSSCommand();
...
}
VB.NET code:
Public WithEvents SSPanel1 As AxThreed.AxSSPanel
Public WithEvents SSFrame1 As AxThreed.AxSSFrame
Public WithEvents SSCommand1 As AxThreed.AxSSCommand
...
Private Sub InitializeComponent()
Me.SSPanel1 = New AxThreed.AxSSPanel
Me.SSFrame1 = New AxThreed.AxSSFrame
Me.SSCommand1 = New AxThreed.AxSSCommand
...
End