RichTextBox & Color

[Jenizix]

А как в RTB цвет текста поменять (не выделенного)?

[ChelDm]

Ищу на форуме уже не раз было такое , и в исходниках поищи

[Jenizix]

ну че не у кого больше ни чего такого нет

[EvilCoder]

RTB.SelColor = vbBlue

[GoGosha]

Вот описание RTF
А можно вначале выделить, а потом цвет изменить

[Ennor]

А как в RTB цвет текста поменять (не выделенного)?

НЕ выделенного - нельзя. Сначала ты должен его выделить. Можно, правда, для всего RTB сразу установить цвет, отличный от черного, но это неинтересно.
Короче: остается только SelColor. Ну, либо как его... PARAFORMAT, кажется. АПИ-структура для форматирования текста.

[Lazy_caT]

А как в RTB цвет текста поменять (не выделенного)?

НЕ выделенного - нельзя. Сначала ты должен его выделить. Можно, правда, для всего RTB сразу установить цвет, отличный от черного, но это неинтересно.
Короче: остается только SelColor. Ну, либо как его... PARAFORMAT, кажется. АПИ-структура для форматирования текста.

Интересно, а почему тогда у меня не получается?...
Вот кусок кода, получает с сокета данные и вставляет в RTB...

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

Private Sub sck_Chat_DataArrival(ByVal bytesTotal As Long)
    Dim DataArrived As String
    Dim DataArrivedBuffer() As String
    Dim TextBeforeMessage As Long

    ReDim DataArrivedBuffer(0)

    sck_Chat.GetData DataArrived
    DataArrivedBuffer = Split(DataArrived, vbCrLf)
   
    TextBeforeMessage = Len(rch_ChatMain.Text)
   
    With rch_ChatMain

' Код для стандартного ReachTextBox'a
'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
        .Enabled = False
        .Text = .Text & DataArrivedBuffer(1) & vbCrLf
        .SelStart = TextBeforeMessage
        .SelLength = Len(.Text) - TextBeforeMessage
        .SelColor = CLng(DataArrivedBuffer(2))
        .SelLength = 0
        .Enabled = True

    End With

End Sub

и при этом получается вот такая картина...

чего делать ума не приложу... Может дадите дельный совет?[/url]

[Ennor]

Ну и чего? Все он у тебя красит! Думаешь, SelStart и SelLength - что делают? Выделяют текст! А SelColor устанавливает цвет выделенного шрифта. А потом ты сбрасываешь выделение.
Или я чего-то не догоняю?