_ Partial Class frmrtf 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.richTextBoxExtended1 = New RichTextBoxExtended.RichTextBoxExtended() Me.SuspendLayout() ' 'richTextBoxExtended1 ' Me.richTextBoxExtended1.AcceptsTab = True Me.richTextBoxExtended1.AutoWordSelection = True Me.richTextBoxExtended1.DetectURLs = True Me.richTextBoxExtended1.Dock = System.Windows.Forms.DockStyle.Fill Me.richTextBoxExtended1.Location = New System.Drawing.Point(0, 0) Me.richTextBoxExtended1.Name = "richTextBoxExtended1" Me.richTextBoxExtended1.ReadOnly = False ' ' ' Me.richTextBoxExtended1.RichTextBox.AcceptsTab = True Me.richTextBoxExtended1.RichTextBox.AutoWordSelection = True Me.richTextBoxExtended1.RichTextBox.Dock = System.Windows.Forms.DockStyle.Fill Me.richTextBoxExtended1.RichTextBox.Location = New System.Drawing.Point(0, 26) Me.richTextBoxExtended1.RichTextBox.Name = "rtb1" Me.richTextBoxExtended1.RichTextBox.Size = New System.Drawing.Size(800, 424) Me.richTextBoxExtended1.RichTextBox.TabIndex = 1 Me.richTextBoxExtended1.ShowBold = True Me.richTextBoxExtended1.ShowCenterJustify = True Me.richTextBoxExtended1.ShowColors = True Me.richTextBoxExtended1.ShowCopy = True Me.richTextBoxExtended1.ShowCut = True Me.richTextBoxExtended1.ShowFont = True Me.richTextBoxExtended1.ShowFontSize = True Me.richTextBoxExtended1.ShowItalic = True Me.richTextBoxExtended1.ShowLeftJustify = True Me.richTextBoxExtended1.ShowOpen = True Me.richTextBoxExtended1.ShowPaste = True Me.richTextBoxExtended1.ShowRedo = True Me.richTextBoxExtended1.ShowRightJustify = True Me.richTextBoxExtended1.ShowSave = True Me.richTextBoxExtended1.ShowStamp = True Me.richTextBoxExtended1.ShowStrikeout = True Me.richTextBoxExtended1.ShowToolBarText = False Me.richTextBoxExtended1.ShowUnderline = True Me.richTextBoxExtended1.ShowUndo = True Me.richTextBoxExtended1.Size = New System.Drawing.Size(800, 450) Me.richTextBoxExtended1.StampAction = RichTextBoxExtended.StampActions.EditedBy Me.richTextBoxExtended1.StampColor = System.Drawing.Color.Blue Me.richTextBoxExtended1.TabIndex = 1 ' ' ' Me.richTextBoxExtended1.Toolbar.Appearance = System.Windows.Forms.ToolBarAppearance.Flat Me.richTextBoxExtended1.Toolbar.ButtonSize = New System.Drawing.Size(16, 16) Me.richTextBoxExtended1.Toolbar.Divider = False Me.richTextBoxExtended1.Toolbar.DropDownArrows = True Me.richTextBoxExtended1.Toolbar.Location = New System.Drawing.Point(0, 0) Me.richTextBoxExtended1.Toolbar.Name = "tb1" Me.richTextBoxExtended1.Toolbar.ShowToolTips = True Me.richTextBoxExtended1.Toolbar.Size = New System.Drawing.Size(800, 26) Me.richTextBoxExtended1.Toolbar.TabIndex = 0 ' 'frmrtf ' Me.AutoScaleDimensions = New System.Drawing.SizeF(8.0!, 16.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(800, 450) Me.Controls.Add(Me.richTextBoxExtended1) Me.Name = "frmrtf" Me.Text = "frmrtf" Me.ResumeLayout(False) End Sub Private WithEvents richTextBoxExtended1 As RichTextBoxExtended.RichTextBoxExtended End Class