_ Partial Class frmStrukturSelect Inherits System.Windows.Forms.Form 'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen. _ Protected Overrides Sub Dispose(ByVal disposing As Boolean) Try If disposing AndAlso components IsNot Nothing Then components.Dispose() End If Finally MyBase.Dispose(disposing) End Try End Sub 'Wird vom Windows Form-Designer benötigt. Private components As System.ComponentModel.IContainer 'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich. 'Das Bearbeiten ist mit dem Windows Form-Designer möglich. 'Das Bearbeiten mit dem Code-Editor ist nicht möglich. _ Private Sub InitializeComponent() Me.components = New System.ComponentModel.Container() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmStrukturSelect)) Me.ToolStrip1 = New System.Windows.Forms.ToolStrip() Me.TSBtnQuit = New System.Windows.Forms.ToolStripButton() Me.TreeStruktur = New DevComponents.AdvTree.AdvTree() Me.ImgList = New System.Windows.Forms.ImageList(Me.components) Me.Node1 = New DevComponents.AdvTree.Node() Me.NodeConnector1 = New DevComponents.AdvTree.NodeConnector() Me.ElementStyle1 = New DevComponents.DotNetBar.ElementStyle() Me.ElementStyle2 = New DevComponents.DotNetBar.ElementStyle() Me.ToolStrip1.SuspendLayout() CType(Me.TreeStruktur, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'ToolStrip1 ' Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.TSBtnQuit}) Me.ToolStrip1.Location = New System.Drawing.Point(0, 0) Me.ToolStrip1.Name = "ToolStrip1" Me.ToolStrip1.Size = New System.Drawing.Size(341, 25) Me.ToolStrip1.TabIndex = 20 Me.ToolStrip1.Text = "ToolStrip1" ' 'TSBtnQuit ' Me.TSBtnQuit.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image Me.TSBtnQuit.Image = CType(resources.GetObject("TSBtnQuit.Image"), System.Drawing.Image) Me.TSBtnQuit.ImageTransparentColor = System.Drawing.Color.Magenta Me.TSBtnQuit.Name = "TSBtnQuit" Me.TSBtnQuit.Size = New System.Drawing.Size(23, 22) Me.TSBtnQuit.Text = "Fenster schliessen" Me.TSBtnQuit.ToolTipText = "Fenster schliessen" ' 'TreeStruktur ' Me.TreeStruktur.AccessibleRole = System.Windows.Forms.AccessibleRole.Outline Me.TreeStruktur.AllowDrop = True Me.TreeStruktur.AllowExternalDrop = False Me.TreeStruktur.BackColor = System.Drawing.SystemColors.Window ' ' ' Me.TreeStruktur.BackgroundStyle.Class = "TreeBorderKey" Me.TreeStruktur.BackgroundStyle.CornerType = DevComponents.DotNetBar.eCornerType.Square Me.TreeStruktur.Dock = System.Windows.Forms.DockStyle.Fill Me.TreeStruktur.GridRowLines = True Me.TreeStruktur.ImageList = Me.ImgList Me.TreeStruktur.LicenseKey = "F962CEC7-CD8F-4911-A9E9-CAB39962FC1F" Me.TreeStruktur.Location = New System.Drawing.Point(0, 25) Me.TreeStruktur.MultiSelect = True Me.TreeStruktur.MultiSelectRule = DevComponents.AdvTree.eMultiSelectRule.AnyNode Me.TreeStruktur.Name = "TreeStruktur" Me.TreeStruktur.Nodes.AddRange(New DevComponents.AdvTree.Node() {Me.Node1}) Me.TreeStruktur.NodesConnector = Me.NodeConnector1 Me.TreeStruktur.NodeStyle = Me.ElementStyle1 Me.TreeStruktur.PathSeparator = ";" Me.TreeStruktur.Size = New System.Drawing.Size(341, 489) Me.TreeStruktur.Styles.Add(Me.ElementStyle1) Me.TreeStruktur.Styles.Add(Me.ElementStyle2) Me.TreeStruktur.TabIndex = 21 Me.TreeStruktur.Text = "AdvTree1" ' 'ImgList ' Me.ImgList.ImageStream = CType(resources.GetObject("ImgList.ImageStream"), System.Windows.Forms.ImageListStreamer) Me.ImgList.TransparentColor = System.Drawing.Color.Transparent Me.ImgList.Images.SetKeyName(0, "Dummy.png") Me.ImgList.Images.SetKeyName(1, "Hardware.png") Me.ImgList.Images.SetKeyName(2, "Telefonie.png") Me.ImgList.Images.SetKeyName(3, "Network.png") Me.ImgList.Images.SetKeyName(4, "Software.png") Me.ImgList.Images.SetKeyName(5, "Service.png") Me.ImgList.Images.SetKeyName(6, "Dummy.png") Me.ImgList.Images.SetKeyName(7, "Dummy.png") Me.ImgList.Images.SetKeyName(8, "Dummy.png") Me.ImgList.Images.SetKeyName(9, "Dummy.png") Me.ImgList.Images.SetKeyName(10, "Dummy.png") Me.ImgList.Images.SetKeyName(11, "Hardware_Folder.png") Me.ImgList.Images.SetKeyName(12, "Telefonie_Folder.png") Me.ImgList.Images.SetKeyName(13, "Network_Folder.png") Me.ImgList.Images.SetKeyName(14, "Software_Folder.png") Me.ImgList.Images.SetKeyName(15, "Service_Folder.png") Me.ImgList.Images.SetKeyName(16, "Dummy.png") Me.ImgList.Images.SetKeyName(17, "Dummy.png") Me.ImgList.Images.SetKeyName(18, "Dummy.png") Me.ImgList.Images.SetKeyName(19, "Dummy.png") Me.ImgList.Images.SetKeyName(20, "Dummy.png") Me.ImgList.Images.SetKeyName(21, "Hardware_Structure.png") Me.ImgList.Images.SetKeyName(22, "Telefonie_Structure.png") Me.ImgList.Images.SetKeyName(23, "Network_Structure.png") Me.ImgList.Images.SetKeyName(24, "Software_Sructure.png") Me.ImgList.Images.SetKeyName(25, "Service_Structure.png") ' 'Node1 ' Me.Node1.Expanded = True Me.Node1.Name = "Node1" Me.Node1.Text = "Node1" ' 'NodeConnector1 ' Me.NodeConnector1.LineColor = System.Drawing.SystemColors.ControlText ' 'ElementStyle1 ' Me.ElementStyle1.CornerType = DevComponents.DotNetBar.eCornerType.Square Me.ElementStyle1.Name = "ElementStyle1" Me.ElementStyle1.TextColor = System.Drawing.SystemColors.ControlText ' 'ElementStyle2 ' Me.ElementStyle2.BackColor2SchemePart = DevComponents.DotNetBar.eColorSchemePart.DockSiteBackColor2 Me.ElementStyle2.BackColorGradientAngle = 50 Me.ElementStyle2.BackColorGradientType = DevComponents.DotNetBar.eGradientType.Radial Me.ElementStyle2.BackColorSchemePart = DevComponents.DotNetBar.eColorSchemePart.DockSiteBackColor Me.ElementStyle2.CornerType = DevComponents.DotNetBar.eCornerType.Square Me.ElementStyle2.Name = "ElementStyle2" ' 'frmStrukturSelect ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(341, 514) Me.Controls.Add(Me.TreeStruktur) Me.Controls.Add(Me.ToolStrip1) Me.Name = "frmStrukturSelect" Me.Text = "frmStrukturSelect" Me.ToolStrip1.ResumeLayout(False) Me.ToolStrip1.PerformLayout() CType(Me.TreeStruktur, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents ToolStrip1 As System.Windows.Forms.ToolStrip Friend WithEvents TSBtnQuit As System.Windows.Forms.ToolStripButton Friend WithEvents TreeStruktur As DevComponents.AdvTree.AdvTree Friend WithEvents Node1 As DevComponents.AdvTree.Node Friend WithEvents NodeConnector1 As DevComponents.AdvTree.NodeConnector Friend WithEvents ElementStyle1 As DevComponents.DotNetBar.ElementStyle Friend WithEvents ElementStyle2 As DevComponents.DotNetBar.ElementStyle Friend WithEvents ImgList As System.Windows.Forms.ImageList End Class