Форум: "Базы";
Текущий архив: 2002.12.05;
Скачать: [xml.tar.bz2];

Вниз

Как в RichEdit вывести рисунок из БД?   Найти похожие ветки 

← →
Smirnoff   (2002-11-15 16:51) [0]

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

---

← →
Prooksius   (2002-11-15 17:04) [1]

Ты гонишь!!! Картинку в 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;

---

← →
Smirnoff   (2002-11-15 17:09) [2]

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

---

Страницы: 1 вся ветка

Форум: "Базы";
Текущий архив: 2002.12.05;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.008 c