| Вопрос: Вставка рисунка в RichTextBox | Добавлено: 30.01.08 01:06 |
Автор вопроса:  Artem
|
| Довольно-таки заезжанный вопрос - как добавить картинку в RichTextBox. В VB 6.0 было два варианта, но оба из них н еподходят. Вариант с OleObjects не подходит во-первых потому, что при каждом добавлении картинки вызывается программа mspaint, а во-вторых потому что в VB.NET просто-напросто нет свойства OleObjects. Второй способ с использованием буфера обмена так же неподходит как-минимум потому, что он очищает буфер обмена от предыдущего содержимого. Подскажите, может в VB.NET появился более цивилизованный способ добавления картинок в RTB? |
| Ответы | Всего ответов: 4 |
|
Номер ответа: 1 Автор ответа:  GeniX ICQ: 418811267 Вопросов: 40 Ответов: 243 |
Web-сайт: Профиль | | #1 | Добавлено: 31.01.08 00:10 |
| http://yanexsoft.narod.ru/vbexample.html | ||
|
Номер ответа: 2 Автор ответа: Георгич Вопросов: 16 Ответов: 52 |
Профиль | | #2 | Добавлено: 31.01.08 21:40 |
|
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
RichTextBox1.Paste() '\\Вставить из буфера обмена картинку ну или текст или всё вместе '\\Чтобы , вставить картинку из файла , его надо сначала создать, а потом его счесть  im Запись_Временный__файл As New IO.FileStream("c:\temp\Временный_файл_двоичный", IO.FileMode.OpenOrCreate)
im Запись_новое As New IO.StreamWriter(Запись_Временный__файл)
Запись_новое.Write(RichTextBox1.Rtf) Запись_новое.Close() Запись_Временный__файл.Close() RichTextBox1.Rtf = "" '\\RichTextBox1.Rtf делаем пустым '\\Читаем созданный файл, опять появляется прежняя картина im Читать_Временный_файл As New IO.FileStream("c:\temp\Временный_файл_двоичный", IO.FileMode.Open)
im Чтение_новое As New IO.StreamReader(Читать_Временный_файл)
RichTextBox1.Rtf = Чтение_новое.ReadToEnd Чтение_новое.Close() Читать_Временный_файл.Close() End Sub Можно создать файл в ручную в Word только с расширением RFT и тогда можно так : RichTextBox1.LoadFile("c:\Временный__файл.Rft" 
|
||
|
Номер ответа: 3 Автор ответа: ГеоргичВопросов: 16 Ответов: 52 |
Профиль | | #3 | Добавлено: 31.01.08 21:45 |
| Извиняюсь, расширение RTF RichTextBox1.LoadFile("c:\Временный__файл.RTF) | ||
|
Номер ответа: 4 Автор ответа:  HarterВопросов: 32 Ответов: 167 |
Профиль | | #4 | Добавлено: 07.03.08 23:07 |
|
А нафига так мучать RichTextBox???
В RichTextBox предусмотренна эта функция... В крайнем случае поройся в "библиотеке кодов"... |
||
Страница: 1 |