Отступ текста справа в RichTextBox

[SBJocker]

Как сделать сабж.?
Собственно нужно чтобы текст печатался не плотную от правого края RTB а на некотором расстоянии от него... Нужно для того что бы на освободившемся месте делать пометки и т.д.

[Krasavica]

Нужно установить свойство SelectionRightIndent в значение, равное отступу (в пикселях).

Более подробно см. SelectionRightIndent property в MSDN.

[tyomitch]

Дык ведь ты уже спрашивал, и тебе уже отвечали: http://bbs.vbstreets.ru/viewtopic.php?t=13040

[Александр80]

Попробуй так SelectionRightIndent - Устанавливает отступ правого края текста от правого поля...

К примеру:
RichTextBox1.SelectionRightIndent = 100
***********************************************
Krasavica, писала правильно... :wink:


Пример из MDSN

[Visual Basic] В следующем примере демонстрируется создание правого поля в элементе управления RichTextBox с помощью свойства SelectionRightIndent. В примере предполагается наличие формы, содержащей элемент управления RichTextBox с именем richTextBox1, а также что код вызывается из события в составе класса формы.


Private Sub WriteIndentedTextToRichTextBox()
' Clear all text from the RichTextBox;
RichTextBox1.Clear()
' Set the font for the text.
RichTextBox1.Font = New Font("Lucinda Console", 12)
' Specify a 20 pixel right indent in all paragraphs.
RichTextBox1.SelectionRightIndent = 30
' Set the text within the control.
RichTextBox1.SelectedText = "All text is indented 20 pixels from the right edge of the RichTextBox."
RichTextBox1.SelectedText = "You can use this property with the SelectionIndent property to provide right and left margins."
RichTextBox1.SelectedText = "After this paragraph the indentation will end." + ControlChars.CrLf
' Remove all right indentation.
RichTextBox1.SelectionRightIndent = 0
RichTextBox1.SelectedText = "This paragraph has no right indentation. All text should flow as normal."
End Sub

[SBJocker]

Только этот код сработает только для выделенного текста

[Александр80]

Только этот код сработает только для выделенного текста

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
RichTextBox1.SelectionRightIndent = 20
End Sub

Если нет выделенного текста, отступ будет применен к абзацу, в котором содержится положение курсора, и ко всему тексту, который пользователь введет в элемент управления после места ставки. Отступ применяется до тех пор, пока значение свойства не будет изменено, или пока положение курсора не будет перемещено в другой абзац элемента управления.

Если в элементе управления выделен текст, то значение данного свойства применяется к этому тексту и к любому тексту, вводимому после выделения. Кроме того, с помощью этого свойства можно задавать отступ абзацам документа элемента управления RichTextBox. Это свойство можно использовать совместно со свойством SelectionIndent для создания абзацев, отображающихся в абзацах.

Чтобы задать красную строку для абзацев элемента управления, воспользуйтесь свойством SelectionHangingIndent.

ЧИТАЙ MSDN

[SBJocker]

спасибо всем, но самый подходящий вариант описал tyomitch, в теме с похожим названием

Подскажите как на освободившемся месте в ричтекстбоксе что-нить нарисовать...

Как я понял событие Paint() не посылается поумолчанию, а только в режиме OwnerDraw но при этом текст тоже нужно самому выводить?