Xceed Docking Windows for WinForms v2.3 Documentation

In This Topic
    BasicTool class
    In This Topic
    VB.NET  

    Imports System
    Imports System.Collections
    Imports System.ComponentModel
    Imports System.Drawing
    Imports System.Data
    Imports System.Windows.Forms 

      Public Class BasicTool
    Inherits Xceed.DockingWindows.ToolWindow 

        Private components As System.ComponentModel.Container = Nothing 

        Public Sub New( key As String, caption As String, image As Image )

          InitializeComponent() 

          Me.Key = key
          Me.Text = caption
          Me.Image = image      
        End Sub   

        Protected Overrides Overloads Sub Dispose( disposing As Boolean )    

          If disposing Then     

            If Not components Is Nothing Then
              components.Dispose()
            End If
          End If 

          MyBase.Dispose( disposing )
        End Sub 

        Private Sub InitializeComponent()    
          Me.Key = "BasicTool"
          Me.Size = new System.Drawing.Size(240, 328)
        End Sub    

        Public Overrides Function ToString() As String    
          Return Me.Text
        End Function
      End Class