RichTextBox

[Алексей К.]

Сабж использую в режиме multiline, как его заставить не переносить (разделять) длинные строки? Если я напечатал текст в строке и дошел до правой границы контрола - то переходит печатать на новую строку, а мне так не надо. Надо что бы продолжал печатать в текущей строке, а переход на другую строку - если нажали enter.

[Viper]

Можно установить свойство RightMargin в очень большую величину для решения этой задачи

[Sirik]

свойтсво ScrollBars

[hCORe]

Код: Выделить всё

Private Declare Function SendMessageLong Lib "user32" Alias "SendMessageA"  (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long

Private Const EM_SHOWSCROLLBAR = 1120
Private Const EM_SETTARGETDEVICE = 1096
Private Const SB_BOTH = 3

<...>
SendMessageLong rtf.hwnd, EM_SHOWSCROLLBAR, SB_BOTH, 1
SendMessageLong rtf.hwnd, EM_SETTARGETDEVICE, 0, 1

[Алексей К.]

Спасибо!!! RightMargin - то что нужно