214 lines
17 KiB
VB.net
214 lines
17 KiB
VB.net
Namespace McDull.Windows.Forms
|
|
Partial Class HTMLTextBox
|
|
Private components As System.ComponentModel.IContainer = Nothing
|
|
|
|
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
|
If disposing AndAlso (components IsNot Nothing) Then
|
|
components.Dispose()
|
|
End If
|
|
|
|
MyBase.Dispose(disposing)
|
|
End Sub
|
|
|
|
Private Sub InitializeComponent()
|
|
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(HTMLTextBox))
|
|
Me.toolStripToolBar = New System.Windows.Forms.ToolStrip()
|
|
Me.toolStripComboBoxName = New System.Windows.Forms.ToolStripComboBox()
|
|
Me.toolStripButtonBold = New System.Windows.Forms.ToolStripButton()
|
|
Me.toolStripButtonItalic = New System.Windows.Forms.ToolStripButton()
|
|
Me.toolStripButtonUnderline = New System.Windows.Forms.ToolStripButton()
|
|
Me.toolStripButtonColor = New System.Windows.Forms.ToolStripButton()
|
|
Me.toolStripSeparatorFont = New System.Windows.Forms.ToolStripSeparator()
|
|
Me.toolStripButtonNumbers = New System.Windows.Forms.ToolStripButton()
|
|
Me.toolStripButtonBullets = New System.Windows.Forms.ToolStripButton()
|
|
Me.toolStripButtonOutdent = New System.Windows.Forms.ToolStripButton()
|
|
Me.toolStripButtonIndent = New System.Windows.Forms.ToolStripButton()
|
|
Me.toolStripSeparatorFormat = New System.Windows.Forms.ToolStripSeparator()
|
|
Me.toolStripButtonLeft = New System.Windows.Forms.ToolStripButton()
|
|
Me.toolStripButtonCenter = New System.Windows.Forms.ToolStripButton()
|
|
Me.toolStripButtonRight = New System.Windows.Forms.ToolStripButton()
|
|
Me.toolStripButtonFull = New System.Windows.Forms.ToolStripButton()
|
|
Me.toolStripSeparatorAlign = New System.Windows.Forms.ToolStripSeparator()
|
|
Me.toolStripButtonLine = New System.Windows.Forms.ToolStripButton()
|
|
Me.toolStripButtonHyperlink = New System.Windows.Forms.ToolStripButton()
|
|
Me.toolStripButtonPicture = New System.Windows.Forms.ToolStripButton()
|
|
Me.webBrowserBody = New System.Windows.Forms.WebBrowser()
|
|
Me.toolStripComboBoxSize = New ToolStripComboBoxEx()
|
|
Me.toolStripToolBar.SuspendLayout()
|
|
Me.SuspendLayout()
|
|
Me.toolStripToolBar.GripStyle = System.Windows.Forms.ToolStripGripStyle.Hidden
|
|
Me.toolStripToolBar.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.toolStripComboBoxName, Me.toolStripComboBoxSize, Me.toolStripButtonBold, Me.toolStripButtonItalic, Me.toolStripButtonUnderline, Me.toolStripButtonColor, Me.toolStripSeparatorFont, Me.toolStripButtonNumbers, Me.toolStripButtonBullets, Me.toolStripButtonOutdent, Me.toolStripButtonIndent, Me.toolStripSeparatorFormat, Me.toolStripButtonLeft, Me.toolStripButtonCenter, Me.toolStripButtonRight, Me.toolStripButtonFull, Me.toolStripSeparatorAlign, Me.toolStripButtonLine, Me.toolStripButtonHyperlink, Me.toolStripButtonPicture})
|
|
Me.toolStripToolBar.Location = New System.Drawing.Point(0, 0)
|
|
Me.toolStripToolBar.Name = "toolStripToolBar"
|
|
Me.toolStripToolBar.RenderMode = System.Windows.Forms.ToolStripRenderMode.System
|
|
Me.toolStripToolBar.Size = New System.Drawing.Size(600, 25)
|
|
Me.toolStripToolBar.TabIndex = 1
|
|
Me.toolStripToolBar.Text = "Tool Bar"
|
|
Me.toolStripComboBoxName.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
|
Me.toolStripComboBoxName.FlatStyle = System.Windows.Forms.FlatStyle.System
|
|
Me.toolStripComboBoxName.MaxDropDownItems = 30
|
|
Me.toolStripComboBoxName.Name = "toolStripComboBoxName"
|
|
Me.toolStripComboBoxName.Size = New System.Drawing.Size(150, 25)
|
|
' AddHandler Me.toolStripComboBoxName.SelectedIndexChanged, New System.EventHandler(Me.toolStripComboBoxName_SelectedIndexChanged)
|
|
Me.toolStripButtonBold.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
|
Me.toolStripButtonBold.Image = (CType((resources.GetObject("toolStripButtonBold.Image")), System.Drawing.Image))
|
|
Me.toolStripButtonBold.ImageTransparentColor = System.Drawing.Color.Magenta
|
|
Me.toolStripButtonBold.Name = "toolStripButtonBold"
|
|
Me.toolStripButtonBold.Size = New System.Drawing.Size(23, 22)
|
|
Me.toolStripButtonBold.Text = "Bold"
|
|
' AddHandler Me.toolStripButtonBold.Click, New System.EventHandler(Me.toolStripButtonBold_Click)
|
|
Me.toolStripButtonItalic.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
|
Me.toolStripButtonItalic.Image = (CType((resources.GetObject("toolStripButtonItalic.Image")), System.Drawing.Image))
|
|
Me.toolStripButtonItalic.ImageTransparentColor = System.Drawing.Color.Magenta
|
|
Me.toolStripButtonItalic.Name = "toolStripButtonItalic"
|
|
Me.toolStripButtonItalic.Size = New System.Drawing.Size(23, 22)
|
|
Me.toolStripButtonItalic.Text = "Italic"
|
|
' AddHandler Me.toolStripButtonItalic.Click, Me.toolStripButtonItalic_Click(Me, New EventArgs)
|
|
Me.toolStripButtonUnderline.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
|
Me.toolStripButtonUnderline.Image = (CType((resources.GetObject("toolStripButtonUnderline.Image")), System.Drawing.Image))
|
|
Me.toolStripButtonUnderline.ImageTransparentColor = System.Drawing.Color.Magenta
|
|
Me.toolStripButtonUnderline.Name = "toolStripButtonUnderline"
|
|
Me.toolStripButtonUnderline.Size = New System.Drawing.Size(23, 22)
|
|
Me.toolStripButtonUnderline.Text = "Underline"
|
|
' AddHandler Me.toolStripButtonUnderline.Click, New System.EventHandler(Me.toolStripButtonUnderline_Click)
|
|
Me.toolStripButtonColor.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
|
Me.toolStripButtonColor.Image = (CType((resources.GetObject("toolStripButtonColor.Image")), System.Drawing.Image))
|
|
Me.toolStripButtonColor.ImageTransparentColor = System.Drawing.Color.Magenta
|
|
Me.toolStripButtonColor.Name = "toolStripButtonColor"
|
|
Me.toolStripButtonColor.Size = New System.Drawing.Size(23, 22)
|
|
Me.toolStripButtonColor.Text = "Font Color"
|
|
' AddHandler Me.toolStripButtonColor.Click, New System.EventHandler(Me.toolStripButtonColor_Click)
|
|
Me.toolStripSeparatorFont.Name = "toolStripSeparatorFont"
|
|
Me.toolStripSeparatorFont.Size = New System.Drawing.Size(6, 25)
|
|
Me.toolStripButtonNumbers.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
|
Me.toolStripButtonNumbers.Image = (CType((resources.GetObject("toolStripButtonNumbers.Image")), System.Drawing.Image))
|
|
Me.toolStripButtonNumbers.ImageTransparentColor = System.Drawing.Color.Magenta
|
|
Me.toolStripButtonNumbers.Name = "toolStripButtonNumbers"
|
|
Me.toolStripButtonNumbers.Size = New System.Drawing.Size(23, 22)
|
|
Me.toolStripButtonNumbers.Text = "Format Numbers"
|
|
' AddHandler Me.toolStripButtonNumbers.Click, New System.EventHandler(Me.toolStripButtonNumbers_Click)
|
|
Me.toolStripButtonBullets.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
|
Me.toolStripButtonBullets.Image = (CType((resources.GetObject("toolStripButtonBullets.Image")), System.Drawing.Image))
|
|
Me.toolStripButtonBullets.ImageTransparentColor = System.Drawing.Color.Magenta
|
|
Me.toolStripButtonBullets.Name = "toolStripButtonBullets"
|
|
Me.toolStripButtonBullets.Size = New System.Drawing.Size(23, 22)
|
|
Me.toolStripButtonBullets.Text = "Format Bullets"
|
|
' AddHandler Me.toolStripButtonBullets.Click, New System.EventHandler(Me.toolStripButtonBullets_Click)
|
|
Me.toolStripButtonOutdent.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
|
Me.toolStripButtonOutdent.Image = (CType((resources.GetObject("toolStripButtonOutdent.Image")), System.Drawing.Image))
|
|
Me.toolStripButtonOutdent.ImageTransparentColor = System.Drawing.Color.Magenta
|
|
Me.toolStripButtonOutdent.Name = "toolStripButtonOutdent"
|
|
Me.toolStripButtonOutdent.Size = New System.Drawing.Size(23, 22)
|
|
Me.toolStripButtonOutdent.Text = "Decrease Indentation"
|
|
' AddHandler Me.toolStripButtonOutdent.Click, New System.EventHandler(Me.toolStripButtonOutdent_Click)
|
|
Me.toolStripButtonIndent.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
|
Me.toolStripButtonIndent.Image = (CType((resources.GetObject("toolStripButtonIndent.Image")), System.Drawing.Image))
|
|
Me.toolStripButtonIndent.ImageTransparentColor = System.Drawing.Color.Magenta
|
|
Me.toolStripButtonIndent.Name = "toolStripButtonIndent"
|
|
Me.toolStripButtonIndent.Size = New System.Drawing.Size(23, 22)
|
|
Me.toolStripButtonIndent.Text = "Increase Indentation"
|
|
'AddHandler Me.toolStripButtonIndent.Click, New System.EventHandler(Me.toolStripButtonIndent_Click)
|
|
Me.toolStripSeparatorFormat.Name = "toolStripSeparatorFormat"
|
|
Me.toolStripSeparatorFormat.Size = New System.Drawing.Size(6, 25)
|
|
Me.toolStripButtonLeft.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
|
Me.toolStripButtonLeft.Image = (CType((resources.GetObject("toolStripButtonLeft.Image")), System.Drawing.Image))
|
|
Me.toolStripButtonLeft.ImageTransparentColor = System.Drawing.Color.Magenta
|
|
Me.toolStripButtonLeft.Name = "toolStripButtonLeft"
|
|
Me.toolStripButtonLeft.Size = New System.Drawing.Size(23, 22)
|
|
Me.toolStripButtonLeft.Text = "Align Left"
|
|
' AddHandler Me.toolStripButtonLeft.Click, New System.EventHandler(Me.toolStripButtonLeft_Click)
|
|
Me.toolStripButtonCenter.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
|
Me.toolStripButtonCenter.Image = (CType((resources.GetObject("toolStripButtonCenter.Image")), System.Drawing.Image))
|
|
Me.toolStripButtonCenter.ImageTransparentColor = System.Drawing.Color.Magenta
|
|
Me.toolStripButtonCenter.Name = "toolStripButtonCenter"
|
|
Me.toolStripButtonCenter.Size = New System.Drawing.Size(23, 22)
|
|
Me.toolStripButtonCenter.Text = "Center"
|
|
' AddHandler Me.toolStripButtonCenter.Click, New System.EventHandler(Me.toolStripButtonCenter_Click)
|
|
Me.toolStripButtonRight.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
|
Me.toolStripButtonRight.Image = (CType((resources.GetObject("toolStripButtonRight.Image")), System.Drawing.Image))
|
|
Me.toolStripButtonRight.ImageTransparentColor = System.Drawing.Color.Magenta
|
|
Me.toolStripButtonRight.Name = "toolStripButtonRight"
|
|
Me.toolStripButtonRight.Size = New System.Drawing.Size(23, 22)
|
|
Me.toolStripButtonRight.Text = "Align Right"
|
|
'AddHandler Me.toolStripButtonRight.Click, New System.EventHandler(Me.toolStripButtonRight_Click)
|
|
Me.toolStripButtonFull.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
|
Me.toolStripButtonFull.Image = (CType((resources.GetObject("toolStripButtonFull.Image")), System.Drawing.Image))
|
|
Me.toolStripButtonFull.ImageTransparentColor = System.Drawing.Color.Magenta
|
|
Me.toolStripButtonFull.Name = "toolStripButtonFull"
|
|
Me.toolStripButtonFull.Size = New System.Drawing.Size(23, 22)
|
|
Me.toolStripButtonFull.Text = "Justify"
|
|
' AddHandler Me.toolStripButtonFull.Click, New System.EventHandler(Me.toolStripButtonFull_Click)
|
|
Me.toolStripSeparatorAlign.Name = "toolStripSeparatorAlign"
|
|
Me.toolStripSeparatorAlign.Size = New System.Drawing.Size(6, 25)
|
|
Me.toolStripButtonLine.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
|
Me.toolStripButtonLine.Image = (CType((resources.GetObject("toolStripButtonLine.Image")), System.Drawing.Image))
|
|
Me.toolStripButtonLine.ImageTransparentColor = System.Drawing.Color.Magenta
|
|
Me.toolStripButtonLine.Name = "toolStripButtonLine"
|
|
Me.toolStripButtonLine.Size = New System.Drawing.Size(23, 22)
|
|
Me.toolStripButtonLine.Text = "Insert Horizontal Line"
|
|
'AddHandler Me.toolStripButtonLine.Click, New System.EventHandler(Me.toolStripButtonLine_Click)
|
|
Me.toolStripButtonHyperlink.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
|
Me.toolStripButtonHyperlink.Image = (CType((resources.GetObject("toolStripButtonHyperlink.Image")), System.Drawing.Image))
|
|
Me.toolStripButtonHyperlink.ImageTransparentColor = System.Drawing.Color.Magenta
|
|
Me.toolStripButtonHyperlink.Name = "toolStripButtonHyperlink"
|
|
Me.toolStripButtonHyperlink.Size = New System.Drawing.Size(23, 22)
|
|
Me.toolStripButtonHyperlink.Text = "Create a Hyperlink"
|
|
' AddHandler Me.toolStripButtonHyperlink.Click, New System.EventHandler(Me.toolStripButtonHyperlink_Click)
|
|
Me.toolStripButtonPicture.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
|
Me.toolStripButtonPicture.Image = (CType((resources.GetObject("toolStripButtonPicture.Image")), System.Drawing.Image))
|
|
Me.toolStripButtonPicture.ImageTransparentColor = System.Drawing.Color.Magenta
|
|
Me.toolStripButtonPicture.Name = "toolStripButtonPicture"
|
|
Me.toolStripButtonPicture.Size = New System.Drawing.Size(23, 22)
|
|
Me.toolStripButtonPicture.Text = "Insert Picture"
|
|
'AddHandler Me.toolStripButtonPicture.Click, New System.EventHandler(Me.toolStripButtonPicture_Click)
|
|
Me.webBrowserBody.AllowWebBrowserDrop = False
|
|
Me.webBrowserBody.Dock = System.Windows.Forms.DockStyle.Fill
|
|
Me.webBrowserBody.IsWebBrowserContextMenuEnabled = False
|
|
Me.webBrowserBody.Location = New System.Drawing.Point(0, 25)
|
|
Me.webBrowserBody.MinimumSize = New System.Drawing.Size(20, 20)
|
|
Me.webBrowserBody.Name = "webBrowserBody"
|
|
Me.webBrowserBody.Size = New System.Drawing.Size(600, 425)
|
|
Me.webBrowserBody.TabIndex = 0
|
|
' AddHandler Me.webBrowserBody.PreviewKeyDown, Me.webBrowserBody_PreviewKeyDown(Me.webBrowserBody, New EventArgs)
|
|
' Me.webBrowserBody.DocumentCompleted += New System.Windows.Forms.WebBrowserDocumentCompletedEventHandler(Me.webBrowserBody_DocumentCompleted)
|
|
Me.toolStripComboBoxSize.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
|
Me.toolStripComboBoxSize.FlatStyle = System.Windows.Forms.FlatStyle.System
|
|
Me.toolStripComboBoxSize.Name = "toolStripComboBoxSize"
|
|
Me.toolStripComboBoxSize.Size = New System.Drawing.Size(36, 25)
|
|
' AddHandler Me.toolStripComboBoxSize.SelectedIndexChanged, New System.EventHandler(Me.toolStripComboBoxSize_SelectedIndexChanged)
|
|
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.None
|
|
Me.Controls.Add(Me.webBrowserBody)
|
|
Me.Controls.Add(Me.toolStripToolBar)
|
|
Me.Name = "HTMLTextBox"
|
|
Me.Size = New System.Drawing.Size(600, 450)
|
|
Me.toolStripToolBar.ResumeLayout(False)
|
|
Me.toolStripToolBar.PerformLayout()
|
|
Me.ResumeLayout(False)
|
|
Me.PerformLayout()
|
|
End Sub
|
|
|
|
Private toolStripToolBar As System.Windows.Forms.ToolStrip
|
|
Private webBrowserBody As System.Windows.Forms.WebBrowser
|
|
Private toolStripComboBoxName As System.Windows.Forms.ToolStripComboBox
|
|
Private toolStripComboBoxSize As ToolStripComboBoxEx
|
|
Private toolStripButtonBold As System.Windows.Forms.ToolStripButton
|
|
Private toolStripButtonItalic As System.Windows.Forms.ToolStripButton
|
|
Private toolStripButtonUnderline As System.Windows.Forms.ToolStripButton
|
|
Private toolStripButtonColor As System.Windows.Forms.ToolStripButton
|
|
Private toolStripSeparatorFont As System.Windows.Forms.ToolStripSeparator
|
|
Private toolStripButtonNumbers As System.Windows.Forms.ToolStripButton
|
|
Private toolStripButtonBullets As System.Windows.Forms.ToolStripButton
|
|
Private toolStripButtonOutdent As System.Windows.Forms.ToolStripButton
|
|
Private toolStripButtonIndent As System.Windows.Forms.ToolStripButton
|
|
Private toolStripSeparatorFormat As System.Windows.Forms.ToolStripSeparator
|
|
Private toolStripButtonLeft As System.Windows.Forms.ToolStripButton
|
|
Private toolStripButtonCenter As System.Windows.Forms.ToolStripButton
|
|
Private toolStripButtonRight As System.Windows.Forms.ToolStripButton
|
|
Private toolStripButtonFull As System.Windows.Forms.ToolStripButton
|
|
Private toolStripSeparatorAlign As System.Windows.Forms.ToolStripSeparator
|
|
Private toolStripButtonLine As System.Windows.Forms.ToolStripButton
|
|
Private toolStripButtonHyperlink As System.Windows.Forms.ToolStripButton
|
|
Private toolStripButtonPicture As System.Windows.Forms.ToolStripButton
|
|
End Class
|
|
End Namespace
|