_ Partial Class MainFrm Inherits System.Windows.Forms.Form 'Form overrides dispose to clean up the component list. _ 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 'Required by the Windows Form Designer Private components As System.ComponentModel.IContainer 'NOTE: The following procedure is required by the Windows Form Designer 'It can be modified using the Windows Form Designer. 'Do not modify it using the code editor. _ Private Sub InitializeComponent() Me.components = New System.ComponentModel.Container Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(MainFrm)) Me.document = New System.Windows.Forms.RichTextBox Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components) Me.CopyToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem Me.PasteToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem Me.CutToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem Me.ToolStrip1 = New System.Windows.Forms.ToolStrip Me.File = New System.Windows.Forms.ToolStripDropDownButton Me.OpenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem Me.SaveToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem Me.CloseToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem Me.ToolStripDropDownButton1 = New System.Windows.Forms.ToolStripDropDownButton Me.CopyToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem Me.PasteToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem Me.CutToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem Me.UndoToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem Me.RedoToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem Me.WriteHTMLLayoutToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem Me.StatusStrip1 = New System.Windows.Forms.StatusStrip Me.ToolStripStatusLabel3 = New System.Windows.Forms.ToolStripStatusLabel Me.NewToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem Me.ToolStripMenuItem4 = New System.Windows.Forms.ToolStripMenuItem Me.ToolStripMenuItem2 = New System.Windows.Forms.ToolStripMenuItem Me.ToolStripMenuItem3 = New System.Windows.Forms.ToolStripMenuItem Me.ClearToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem Me.charnum = New System.Windows.Forms.ToolStripStatusLabel Me.ToolStripLabel1 = New System.Windows.Forms.ToolStripLabel Me.ContextMenuStrip1.SuspendLayout() Me.ToolStrip1.SuspendLayout() Me.StatusStrip1.SuspendLayout() Me.SuspendLayout() ' 'document ' Me.document.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ Or System.Windows.Forms.AnchorStyles.Left) _ Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.document.ContextMenuStrip = Me.ContextMenuStrip1 Me.document.DetectUrls = False Me.document.Font = New System.Drawing.Font("Verdana", 9.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.document.ForeColor = System.Drawing.Color.MediumBlue Me.document.Location = New System.Drawing.Point(12, 28) Me.document.Name = "document" Me.document.ScrollBars = System.Windows.Forms.RichTextBoxScrollBars.ForcedVertical Me.document.Size = New System.Drawing.Size(511, 291) Me.document.TabIndex = 0 Me.document.Text = "" ' 'ContextMenuStrip1 ' Me.ContextMenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.CopyToolStripMenuItem, Me.PasteToolStripMenuItem, Me.CutToolStripMenuItem}) Me.ContextMenuStrip1.Name = "ContextMenuStrip1" Me.ContextMenuStrip1.Size = New System.Drawing.Size(113, 70) ' 'CopyToolStripMenuItem ' Me.CopyToolStripMenuItem.Name = "CopyToolStripMenuItem" Me.CopyToolStripMenuItem.Size = New System.Drawing.Size(112, 22) Me.CopyToolStripMenuItem.Text = "Copy" ' 'PasteToolStripMenuItem ' Me.PasteToolStripMenuItem.Name = "PasteToolStripMenuItem" Me.PasteToolStripMenuItem.Size = New System.Drawing.Size(112, 22) Me.PasteToolStripMenuItem.Text = "Paste" ' 'CutToolStripMenuItem ' Me.CutToolStripMenuItem.Name = "CutToolStripMenuItem" Me.CutToolStripMenuItem.Size = New System.Drawing.Size(112, 22) Me.CutToolStripMenuItem.Text = "Cut" ' 'ToolStrip1 ' Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.File, Me.ToolStripDropDownButton1, Me.ToolStripLabel1}) Me.ToolStrip1.Location = New System.Drawing.Point(0, 0) Me.ToolStrip1.Name = "ToolStrip1" Me.ToolStrip1.Size = New System.Drawing.Size(535, 25) Me.ToolStrip1.TabIndex = 4 Me.ToolStrip1.Text = "Menu: " ' 'File ' Me.File.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.NewToolStripMenuItem, Me.OpenToolStripMenuItem, Me.SaveToolStripMenuItem, Me.ToolStripMenuItem4, Me.CloseToolStripMenuItem}) Me.File.ImageTransparentColor = System.Drawing.Color.Magenta Me.File.Name = "File" Me.File.Size = New System.Drawing.Size(36, 22) Me.File.Text = "File" Me.File.ToolTipText = "File" ' 'OpenToolStripMenuItem ' Me.OpenToolStripMenuItem.BackColor = System.Drawing.SystemColors.Window Me.OpenToolStripMenuItem.Image = CType(resources.GetObject("OpenToolStripMenuItem.Image"), System.Drawing.Image) Me.OpenToolStripMenuItem.Name = "OpenToolStripMenuItem" Me.OpenToolStripMenuItem.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.O), System.Windows.Forms.Keys) Me.OpenToolStripMenuItem.Size = New System.Drawing.Size(152, 22) Me.OpenToolStripMenuItem.Text = "Open" ' 'SaveToolStripMenuItem ' Me.SaveToolStripMenuItem.BackColor = System.Drawing.SystemColors.Window Me.SaveToolStripMenuItem.Image = CType(resources.GetObject("SaveToolStripMenuItem.Image"), System.Drawing.Image) Me.SaveToolStripMenuItem.Name = "SaveToolStripMenuItem" Me.SaveToolStripMenuItem.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.S), System.Windows.Forms.Keys) Me.SaveToolStripMenuItem.Size = New System.Drawing.Size(152, 22) Me.SaveToolStripMenuItem.Text = "Save" ' 'CloseToolStripMenuItem ' Me.CloseToolStripMenuItem.BackColor = System.Drawing.SystemColors.Window Me.CloseToolStripMenuItem.Image = CType(resources.GetObject("CloseToolStripMenuItem.Image"), System.Drawing.Image) Me.CloseToolStripMenuItem.Name = "CloseToolStripMenuItem" Me.CloseToolStripMenuItem.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.E), System.Windows.Forms.Keys) Me.CloseToolStripMenuItem.Size = New System.Drawing.Size(152, 22) Me.CloseToolStripMenuItem.Text = "Close" ' 'ToolStripDropDownButton1 ' Me.ToolStripDropDownButton1.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text Me.ToolStripDropDownButton1.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.CopyToolStripMenuItem1, Me.PasteToolStripMenuItem1, Me.CutToolStripMenuItem1, Me.ToolStripMenuItem2, Me.UndoToolStripMenuItem, Me.RedoToolStripMenuItem, Me.ToolStripMenuItem3, Me.WriteHTMLLayoutToolStripMenuItem, Me.ClearToolStripMenuItem}) Me.ToolStripDropDownButton1.Image = CType(resources.GetObject("ToolStripDropDownButton1.Image"), System.Drawing.Image) Me.ToolStripDropDownButton1.ImageTransparentColor = System.Drawing.Color.Magenta Me.ToolStripDropDownButton1.Name = "ToolStripDropDownButton1" Me.ToolStripDropDownButton1.Size = New System.Drawing.Size(38, 22) Me.ToolStripDropDownButton1.Text = "Edit" ' 'CopyToolStripMenuItem1 ' Me.CopyToolStripMenuItem1.BackColor = System.Drawing.SystemColors.Window Me.CopyToolStripMenuItem1.Image = CType(resources.GetObject("CopyToolStripMenuItem1.Image"), System.Drawing.Image) Me.CopyToolStripMenuItem1.Name = "CopyToolStripMenuItem1" Me.CopyToolStripMenuItem1.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.C), System.Windows.Forms.Keys) Me.CopyToolStripMenuItem1.Size = New System.Drawing.Size(215, 22) Me.CopyToolStripMenuItem1.Text = "Copy" ' 'PasteToolStripMenuItem1 ' Me.PasteToolStripMenuItem1.BackColor = System.Drawing.SystemColors.Window Me.PasteToolStripMenuItem1.Image = CType(resources.GetObject("PasteToolStripMenuItem1.Image"), System.Drawing.Image) Me.PasteToolStripMenuItem1.Name = "PasteToolStripMenuItem1" Me.PasteToolStripMenuItem1.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.V), System.Windows.Forms.Keys) Me.PasteToolStripMenuItem1.Size = New System.Drawing.Size(215, 22) Me.PasteToolStripMenuItem1.Text = "Paste" ' 'CutToolStripMenuItem1 ' Me.CutToolStripMenuItem1.BackColor = System.Drawing.SystemColors.Window Me.CutToolStripMenuItem1.Image = CType(resources.GetObject("CutToolStripMenuItem1.Image"), System.Drawing.Image) Me.CutToolStripMenuItem1.Name = "CutToolStripMenuItem1" Me.CutToolStripMenuItem1.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.X), System.Windows.Forms.Keys) Me.CutToolStripMenuItem1.Size = New System.Drawing.Size(215, 22) Me.CutToolStripMenuItem1.Text = "Cut" ' 'UndoToolStripMenuItem ' Me.UndoToolStripMenuItem.BackColor = System.Drawing.SystemColors.Window Me.UndoToolStripMenuItem.Image = CType(resources.GetObject("UndoToolStripMenuItem.Image"), System.Drawing.Image) Me.UndoToolStripMenuItem.Name = "UndoToolStripMenuItem" Me.UndoToolStripMenuItem.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.Z), System.Windows.Forms.Keys) Me.UndoToolStripMenuItem.Size = New System.Drawing.Size(215, 22) Me.UndoToolStripMenuItem.Text = "Undo" ' 'RedoToolStripMenuItem ' Me.RedoToolStripMenuItem.BackColor = System.Drawing.SystemColors.Window Me.RedoToolStripMenuItem.Image = CType(resources.GetObject("RedoToolStripMenuItem.Image"), System.Drawing.Image) Me.RedoToolStripMenuItem.Name = "RedoToolStripMenuItem" Me.RedoToolStripMenuItem.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.Y), System.Windows.Forms.Keys) Me.RedoToolStripMenuItem.Size = New System.Drawing.Size(215, 22) Me.RedoToolStripMenuItem.Text = "Redo" ' 'WriteHTMLLayoutToolStripMenuItem ' Me.WriteHTMLLayoutToolStripMenuItem.BackColor = System.Drawing.SystemColors.Window Me.WriteHTMLLayoutToolStripMenuItem.Image = CType(resources.GetObject("WriteHTMLLayoutToolStripMenuItem.Image"), System.Drawing.Image) Me.WriteHTMLLayoutToolStripMenuItem.Name = "WriteHTMLLayoutToolStripMenuItem" Me.WriteHTMLLayoutToolStripMenuItem.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.H), System.Windows.Forms.Keys) Me.WriteHTMLLayoutToolStripMenuItem.Size = New System.Drawing.Size(215, 22) Me.WriteHTMLLayoutToolStripMenuItem.Text = "Write HTML Layout" ' 'StatusStrip1 ' Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripStatusLabel3, Me.charnum}) Me.StatusStrip1.Location = New System.Drawing.Point(0, 327) Me.StatusStrip1.Name = "StatusStrip1" Me.StatusStrip1.Size = New System.Drawing.Size(535, 22) Me.StatusStrip1.TabIndex = 5 Me.StatusStrip1.Text = "StatusStrip1" ' 'ToolStripStatusLabel3 ' Me.ToolStripStatusLabel3.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text Me.ToolStripStatusLabel3.ForeColor = System.Drawing.SystemColors.ControlText Me.ToolStripStatusLabel3.Name = "ToolStripStatusLabel3" Me.ToolStripStatusLabel3.Size = New System.Drawing.Size(67, 17) Me.ToolStripStatusLabel3.Text = "Characters: " Me.ToolStripStatusLabel3.TextAlign = System.Drawing.ContentAlignment.MiddleRight ' 'NewToolStripMenuItem ' Me.NewToolStripMenuItem.BackColor = System.Drawing.SystemColors.Window Me.NewToolStripMenuItem.Image = CType(resources.GetObject("NewToolStripMenuItem.Image"), System.Drawing.Image) Me.NewToolStripMenuItem.Name = "NewToolStripMenuItem" Me.NewToolStripMenuItem.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.N), System.Windows.Forms.Keys) Me.NewToolStripMenuItem.Size = New System.Drawing.Size(152, 22) Me.NewToolStripMenuItem.Text = "New" ' 'ToolStripMenuItem4 ' Me.ToolStripMenuItem4.BackColor = System.Drawing.SystemColors.Window Me.ToolStripMenuItem4.Enabled = False Me.ToolStripMenuItem4.Name = "ToolStripMenuItem4" Me.ToolStripMenuItem4.Size = New System.Drawing.Size(152, 22) Me.ToolStripMenuItem4.Text = " " ' 'ToolStripMenuItem2 ' Me.ToolStripMenuItem2.BackColor = System.Drawing.SystemColors.Window Me.ToolStripMenuItem2.Enabled = False Me.ToolStripMenuItem2.Name = "ToolStripMenuItem2" Me.ToolStripMenuItem2.Size = New System.Drawing.Size(215, 22) ' 'ToolStripMenuItem3 ' Me.ToolStripMenuItem3.BackColor = System.Drawing.SystemColors.Window Me.ToolStripMenuItem3.Name = "ToolStripMenuItem3" Me.ToolStripMenuItem3.Size = New System.Drawing.Size(215, 22) ' 'ClearToolStripMenuItem ' Me.ClearToolStripMenuItem.BackColor = System.Drawing.SystemColors.Window Me.ClearToolStripMenuItem.Image = CType(resources.GetObject("ClearToolStripMenuItem.Image"), System.Drawing.Image) Me.ClearToolStripMenuItem.Name = "ClearToolStripMenuItem" Me.ClearToolStripMenuItem.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.D), System.Windows.Forms.Keys) Me.ClearToolStripMenuItem.Size = New System.Drawing.Size(215, 22) Me.ClearToolStripMenuItem.Text = "Clear" ' 'charnum ' Me.charnum.Name = "charnum" Me.charnum.Size = New System.Drawing.Size(13, 17) Me.charnum.Text = "0" ' 'ToolStripLabel1 ' Me.ToolStripLabel1.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right Me.ToolStripLabel1.BackColor = System.Drawing.SystemColors.Control Me.ToolStripLabel1.Enabled = False Me.ToolStripLabel1.Image = CType(resources.GetObject("ToolStripLabel1.Image"), System.Drawing.Image) Me.ToolStripLabel1.Name = "ToolStripLabel1" Me.ToolStripLabel1.Size = New System.Drawing.Size(298, 22) Me.ToolStripLabel1.Text = "Copyright 2008 Killsoft - http://killsoft.onlinewebshop.net" ' 'MainFrm ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(535, 349) Me.Controls.Add(Me.StatusStrip1) Me.Controls.Add(Me.ToolStrip1) Me.Controls.Add(Me.document) Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) Me.Name = "MainFrm" Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen Me.Text = "Killsoft HTML-Editor" Me.ContextMenuStrip1.ResumeLayout(False) Me.ToolStrip1.ResumeLayout(False) Me.ToolStrip1.PerformLayout() Me.StatusStrip1.ResumeLayout(False) Me.StatusStrip1.PerformLayout() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents document As System.Windows.Forms.RichTextBox Friend WithEvents ToolStrip1 As System.Windows.Forms.ToolStrip Friend WithEvents StatusStrip1 As System.Windows.Forms.StatusStrip Friend WithEvents File As System.Windows.Forms.ToolStripDropDownButton Friend WithEvents OpenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents SaveToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents CloseToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents ToolStripDropDownButton1 As System.Windows.Forms.ToolStripDropDownButton Friend WithEvents UndoToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents RedoToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents WriteHTMLLayoutToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents ToolStripStatusLabel3 As System.Windows.Forms.ToolStripStatusLabel Friend WithEvents ContextMenuStrip1 As System.Windows.Forms.ContextMenuStrip Friend WithEvents CopyToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents PasteToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents CutToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents CopyToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem Friend WithEvents PasteToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem Friend WithEvents CutToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem Friend WithEvents NewToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents ToolStripMenuItem4 As System.Windows.Forms.ToolStripMenuItem Friend WithEvents ToolStripMenuItem2 As System.Windows.Forms.ToolStripMenuItem Friend WithEvents ToolStripMenuItem3 As System.Windows.Forms.ToolStripMenuItem Friend WithEvents ClearToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents charnum As System.Windows.Forms.ToolStripStatusLabel Friend WithEvents ToolStripLabel1 As System.Windows.Forms.ToolStripLabel End Class