powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / RichTextBox
3 сообщений из 3, страница 1 из 1
RichTextBox
    #33634527
Алексей К.2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Сабж использую в режиме multiline, как его заставить не переносить (разделять) длинные строки? Если я напечатал текст в строке и дошел до правой границы контрола - то переходит печатать на новую строку, а мне так не надо. Надо что бы продолжал печатать в текущей строке, а переход на другую строку - если нажали enter.
...
Рейтинг: 0 / 0
RichTextBox
    #33634613
Фотография Serge Gavrilov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вы можете использовать для этого свойство RightMargin.

Также можно использовать код
( RichTextBox and wordwrap )

Gordon Bell
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
Public 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 


Public Const WM_USER = &H400 
Public Const EM_SETTARGETDEVICE = (WM_USER +  72 ) 


Public Sub SetWordWrap(ByRef pctl As Control, ByVal pbWordWrap As Boolean) 
    If pbWordWrap Then 
        SendMessageLong pctl.hWnd, EM_SETTARGETDEVICE,  0 ,  0  
    Else 
        SendMessageLong pctl.hWnd, EM_SETTARGETDEVICE,  0 ,  1  
    End If 
End Sub 

Usage:


' Turn Word Wrap On
Call SetWordWrap(RichTextBox1, True)


' Turn Word Wrap Off
Call SetWordWrap(RichTextBox1, False)
...
Рейтинг: 0 / 0
RichTextBox
    #33634818
Алексей К.2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо!!!
...
Рейтинг: 0 / 0
3 сообщений из 3, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / RichTextBox
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]