|
|
|
Вывод лога в RichTextBox
|
|||
|---|---|---|---|
|
#18+
Доброе время суток. Помогите, плз, разобраться. На форме проги добавил RichTextBox, в который хочу выводить результаты выполнения операций программы. Например, строка с успешным выполнением должна быть зеленого цвета, с ошибками красного... написал процедуру добавления строки в LogBox: [src vba] Public Sub AddMsg(ByVal str As String, ByVal color As System.Drawing.Color) Dim str1 As String = str & vbNewLine ' сформируем новую строку Me.LogBox.SelectionStart = Me.LogBox.Text.Length Me.LogBox.Text = Me.LogBox.Text & str1 Me.LogBox.SelectionLength = str1.Length Me.LogBox.SelectionColor = color ' Прокрутим техт-бох Me.LogBox.SelectionStart = Me.LogBox.Text.Length Me.LogBox.ScrollToCaret() End Sub [/src vba] однако, текст меняет свой цвет "непонятно как" - часть текста менят цвет на заданный в прошлый раз, часть на текущий ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 28.07.2009, 11:20 |
|
||
|
Вывод лога в RichTextBox
|
|||
|---|---|---|---|
|
#18+
Код: plaintext 1. 2. 3. 4. 5. 6. 7. 8. 9. 10. 11. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 28.07.2009, 11:23 |
|
||
|
Вывод лога в RichTextBox
|
|||
|---|---|---|---|
|
#18+
Забыл указать – пишу на .NET Framework 2.0 тяжелое утро ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 28.07.2009, 11:25 |
|
||
|
Вывод лога в RichTextBox
|
|||
|---|---|---|---|
|
#18+
Код: plaintext 1. 2. 3. 4. 5. 6. 7. 8. 9. 10. 11. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 28.07.2009, 17:42 |
|
||
|
|

start [/forum/topic.php?fid=60&fpage=152&tid=2160722]: |
0ms |
get settings: |
9ms |
get forum list: |
15ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
21ms |
get topic data: |
12ms |
get forum data: |
3ms |
get page messages: |
39ms |
get tp. blocked users: |
2ms |
| others: | 194ms |
| total: | 301ms |

| 0 / 0 |
