Абзац и отступ

29.03.2007, 08:52. **Показов** 6361. **Ответов** 5

Студворк — интернет-сервис помощи студентам

Пожалуйста подскажите как можно делать только первую строку абзаца отступ в право и как можно считать сколько абзаца в RichBox-е. Заранее спасибо

Vova

@zans · 29.03.2007, 14:55

Вот рабочий пример работы с абзацами. Рекомендую для большей функциональности посмотреть API RichTextBox, там структура
PARAFORMAT2 имеет множество полезных параметров (как в Word).

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
Private Sub Command1_Click()
 ' Установить слева отступ всего абзаца
 RichTextBox1.SelIndent = 2
End Sub
 
Private Sub Command2_Click()
' Установить отступ всего абзаца кроме первой строки
RichTextBox1.SelHangingIndent = 1
End Sub
 
Private Sub Command3_Click()
' Установить отступ справа
RichTextBox1.SelRightIndent = 1
End Sub
 
Private Sub Command4_Click()
' Подсчитать количество абзацев
Dim i, k As Integer
 i = 0: k = 0
  Do
   k = InStr(k + 1, RichTextBox1.Text, vbCrLf, vbTextCompare)
   i = i + 1
  Loop While (k <> 0)
 MsgBox i
End Sub
 
Private Sub Command5_Click()
' Установить красную строку, через табуляцию (Ctrl+Tab)
RichTextBox1.SelTabCount = 1
RichTextBox1.SelTabs(0) = 1
End Sub
 
Private Sub Form_Load()
 ' В сантиметрах
 Me.ScaleMode = 7
 With RichTextBox1
  .Text = 'Первый абзац текста. Не очень длинный но полезный для примера.'
  .Text = .Text & vbCrLf & 'Второй абзац текста. Элемент по размерам в примере маленький.'
 End With
End Sub

30.03.2007, 05:36

Спасибо вам, и еще один вопрос где можно найти и узнать побольше информацию о функциональный возможностях API RichTextBox (PARAFORMAT2). Еше раз спасибо

@zans · 01.04.2007, 05:02

Дополнительная информация в Win32 SDK или MSDN. MSDN распространяется отдельно от VB на 3-х компакт-дисках. Там есть раздел посвященный Rich в нем и описание структур и сообщений.

01.04.2007, 17:20

Или используй онлайн-версию

http://msdn.microsoft.com/library/devprods/vs6/vbasic/rtfbox98/vbobjrichedit.htm

@Ierihon · 07.12.2018, 14:51

Не подскажите, что то подобное для TextBox существует?
RichTextBox1.SelIndent = 2

Не могу отступ от края сделать.

Новые блоги и статьи Все статьи Все блоги /
Оттенки серого Argus19 18.03.2026 Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .	SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++ 8Observer8 17.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip	Символические и жёсткие ссылки в Linux. algri14 15.03.2026 Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .	[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ФедосеевПавел 14.03.2026 Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию anaschu 13.03.2026 прикрепляю статью	SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:	Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .

Vovan

	Абзац и отступ 29.03.2007, 08:52. Показов 6361. Ответов 5 Метки нет (Все метки) Пожалуйста подскажите как можно делать только первую строку абзаца отступ в право и как можно считать сколько абзаца в RichBox-е. Заранее спасибо Vova

Vovan
	30.03.2007, 05:36
	Спасибо вам, и еще один вопрос где можно найти и узнать побольше информацию о функциональный возможностях API RichTextBox (PARAFORMAT2). Еше раз спасибо

@zans 0 / 0 / 1 Регистрация: 21.02.2007 Сообщений: 126
	01.04.2007, 05:02
	Дополнительная информация в Win32 SDK или MSDN. MSDN распространяется отдельно от VB на 3-х компакт-дисках. Там есть раздел посвященный Rich в нем и описание структур и сообщений. 0

asd
	01.04.2007, 17:20
	Или используй онлайн-версию http://msdn.microsoft.com/library/devprods/vs6/vbasic/rtfbox98/vbobjrichedit.htm

@Ierihon 0 / 0 / 0 Регистрация: 24.09.2013 Сообщений: 32
	07.12.2018, 14:51
	Не подскажите, что то подобное для TextBox существует? RichTextBox1.SelIndent = 2 Не могу отступ от края сделать. 0