Страница: 1 |
Как сделать выделение цветом в RichText при добавлении, а не при редактировании? Например, если сделатьы RichTextBox1.SelColor = vbRed RichTextBox1.Text = RichTextBox1.Text & "Первая запись" RichTextBox1.SelColor = vbGreen RichTextBox1.Text = RichTextBox1.Text & "Вторая запись" то и первая запись, и вторая будут зеленого цвета. Если сначала делать выделение, а потом менять цвет выделенного текста, то это тоже не катит, слишком долго :(
Попробуй лучше так: Private Sub Command1_Click() RichTextBox1.SelStart = Len(RichTextBox1.Text) RichTextBox1.SelColor = vbRed RichTextBox1.SelText = "Первая запись" RichTextBox1.SelStart = Len(RichTextBox1.Text) RichTextBox1.SelColor = vbGreen RichTextBox1.SelText = "Вторая запись" End Sub Спасибо. Всё работает Страница: 1 |
Вопрос: RichText
Добавлено: 12.03.04 08:16
Автор вопроса: Novichek
Ответы
Всего ответов: 2
Номер ответа: 1
Автор ответа:
LamerOnLine
ICQ: 334781088
Вопросов: 108
Ответов: 2822
Профиль | | #1
Добавлено: 12.03.04 09:19
Номер ответа: 2
Автор ответа:
Novichek
Вопросов: 19
Ответов: 60
Профиль | | #2
Добавлено: 12.03.04 13:20