Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница:

 

  Вопрос: Смена фона в RichTextBox Добавлено: 23.01.05 08:32  

Автор вопроса:  Brusco
Вопрос собственно прост - как сменить фон в окне RichTextBox через WinAPI? Существует такая константа EM_SETBKGNDCOLOR, которую нужно передавать вместе с цветом окну. Но фон не меняется! Или меняется на какой-то зелёный.

Ответить

  Ответы Всего ответов: 5  

Номер ответа: 1
Автор ответа:
 Mihalыch



ICQ: 373-509-101 

Вопросов: 56
Ответов: 330
 Профиль | | #1 Добавлено: 23.01.05 08:55
Если нужно изменить просто цвет фона, почему бы не воспользоваться свойством BackColor. А если ты имеешь ввиду поместить туда картинку, тогда как-то так:
RichTextBox.OLEObjects.Add , , App.Path & "\1.bmp"
 Хотя с картинкой сам не пробовал.

Ответить

Номер ответа: 2
Автор ответа:
 Mihalыch



ICQ: 373-509-101 

Вопросов: 56
Ответов: 330
 Профиль | | #2 Добавлено: 23.01.05 09:00
Option Explicit

    Private Const WM_USER As Long = &H400
    Private Const EM_SETBKGNDCOLOR As Long = (WM_USER + 67)
    Private Declare Function SendMessage Lib "user32.dll" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long

Private Sub Command1_Click()
    SendMessage RichTextBox1.hwnd, EM_SETBKGNDCOLOR, 0, vbRed
End Sub

Ответить

Номер ответа: 3
Автор ответа:
 Александр



Разработчик Offline Client

ICQ: 204034 

Вопросов: 106
Ответов: 1919
 Профиль | | #3 Добавлено: 23.01.05 09:34
Есди ты хочешь еще что-нить сделать с RichTextBox'ом, то посмотри исходник от sne:
http://aesoft.boom.ru/c_rich.html

Ответить

Номер ответа: 4
Автор ответа:
 Brusco



Вопросов: 5
Ответов: 12
 Профиль | | #4 Добавлено: 25.01.05 02:01
Большое спасибо. Всё работает!

Ответить

Номер ответа: 5
Автор ответа:
 Александр



Разработчик Offline Client

ICQ: 204034 

Вопросов: 106
Ответов: 1919
 Профиль | | #5 Добавлено: 25.01.05 09:27
Да не за что... Обращайся еще! ;)

Ответить

Страница:

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам