| Вопрос: Imege in RichText | Добавлено: 21.03.04 09:39 |
Автор вопроса:  Novichek
|
|
Пробовал вставить картинку (16х16) в RichText с OLEObjects.Add, дак она вставилась слишком большой да еще и с подписью :( Не подскажите, как вставить маленькие картинки? P.S. После вставки ее еще и ACDSee открывает... |
| Ответы | Всего ответов: 4 |
|
Номер ответа: 1 Автор ответа: Calhoon ICQ: 789764 Вопросов: 90 Ответов: 230 |
Web-сайт: Профиль | | #1 | Добавлено: 21.03.04 10:45 |
Вот и меня такая же фигня. Тока в MS PhotoEditor открывает...
|
||
|
Номер ответа: 2 Автор ответа:  Clubber Вопросов: 1 Ответов: 18 |
Профиль | | #2 | Добавлено: 21.03.04 19:15 |
|
через send message надо... |
||
|
Номер ответа: 3 Автор ответа:  NovichekВопросов: 19 Ответов: 60 |
Профиль | | #3 | Добавлено: 21.03.04 19:41 |
|
А поподробней, можно |
||
Если не затруднит...|
Номер ответа: 4 Автор ответа: LamerOnLine ICQ: 334781088 Вопросов: 108 Ответов: 2822 |
Профиль | | #4 | Добавлено: 22.03.04 10:02 |
|
Через send message будет та же лабуда, я уже говорил об этом. 1. Картинка будет уязвима редактированию независимо от твоего желания. 2. Невозможно вставить в режиме Locked Думается, это проблема контрола, искать альтернативу надо. Если ты, конечно, имел ввиду что-то вроде Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal _ hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, _ lParam As Any) As Long Private Const WM_PASTE = &H302 Sub InsertPictureInRichTextBox(RTB As RichTextBox, Picture As StdPicture) ' copy into the clipboard ' Copy the picture into the clipboard. Clipboard.Clear Clipboard.SetData Picture ' paste into the RichTextBox control SendMessage RTB.hwnd, WM_PASTE, 0, 0 End Sub |
||
Страница: 1 |