| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Как в RichEdit вывести рисунок из БД? [D5, IB4.x, InterBase]

Smirnoff ©   (2002-11-15 16:51:00) 

Рисунок в bmp формате. Хранится в поле BLOB. Для печати надо выводить его вместе с остальной информацией в RichEdit.
Как это все состряпать?

---

Smirnoff   (2002-11-15 17:09:00) [1]

Я не гоню. Мне как сказали делать, так и делаю.
Спасибо за совет.

---

Prooksius   (2002-11-15 17:04:00) [2]

Ты гонишь!!! Картинку в bmp хранить в базе? :)))))))
Так база же раздуется до немерянных размеров!!!
Храни в JPEG.

Пользуйся RxRichEdit.
Можно это сделать примерно так:
procedure TMainForm.InsertBitmap(Sender: TObject);
var
Pict: TBitmap;
Stream: TMemoryStream;
begin
Stream := TMemoryStream.Create.
DataSet.FieldByName("FieldName").SaveToStream(Stream);
Pict := TBitmap.Create;
try
Pict.LoadFromStream(Stream);
Clipboard.Assign(Pict);
Editor.PasteFromClipboard;
finally
Pict.Free;
end;
Stream.Free;
end;

---

Наверх