| Вопрос: Смайлы в чате на VB 6.0 | Добавлено: 20.03.07 18:42 |
Автор вопроса:  MIRC | ICQ: 254226129 |
|
Привет всем! Ребята подскажите где найти контрол для VB 6.0 в котором можно было бы отображать текст и смайлы? Вобщем как в чатах всяких разных...
Спасибо! |
| Ответы | Всего ответов: 5 |
|
Номер ответа: 1 Автор ответа:  Sharp Лидер форума ICQ: 216865379 Вопросов: 106 Ответов: 9979 |
Web-сайт: Профиль | | #1 | Добавлено: 20.03.07 18:52 |
| WebBrowser | ||
|
Номер ответа: 2 Автор ответа: AgentFireICQ: 192496851 Вопросов: 75 Ответов: 3178 |
Профиль | | #2 | Добавлено: 20.03.07 19:26 |
|
Текст и смайлы?
RichTextBox, его не надо искать, он встроенный |
||
|
Номер ответа: 3 Автор ответа: MIRC ICQ: 254226129 Вопросов: 6 Ответов: 6 |
Профиль | | #3 | Добавлено: 20.03.07 20:02 |
| Забыл сказать про RichTextBox, есть у меня пример такой, но меня такое не устраивает, глючно очень!!! | ||
|
Номер ответа: 4 Автор ответа: AgentFireICQ: 192496851 Вопросов: 75 Ответов: 3178 |
Профиль | | #4 | Добавлено: 20.03.07 23:27 |
| А ты исправь глюки. И будет неглючной | ||
|
Номер ответа: 5 Автор ответа: noname_kazan Вопросов: 12 Ответов: 12 |
Профиль | | #5 | Добавлено: 21.03.07 15:10 |
|
Private Sub Command1_Click()
a = RichTextBox1.SelStart RichTextBox1.OLEObjects.Add , , "  :\4\add_pictures_to_richtextbox\smile.bmp"
RichTextBox1.SelStart = a + 1 RichTextBox1.SetFocus End Sub Private Sub Form_Load() RichTextBox1.OLEObjects.Clear End Sub Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer) RichTextBox1.OLEObjects.Clear End Sub Как можно исправить ?? |
||
Страница: 1 |