Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.12.05;
Скачать: CL | DM;

Вниз

Как в 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;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.012 c
1-14604
nika_ufc
2002-11-24 17:34
2002.12.05
все хорошо НО.............


4-14879
INCOGNITO
2002-10-24 20:09
2002.12.05
Как програмно


14-14797
LordOfSilence
2002-11-15 14:06
2002.12.05
Сегодня пятница. Извините, не удержался...


6-14706
and1
2002-10-09 21:00
2002.12.05
hab, switch


3-14385
alexandr_kr
2002-11-15 13:46
2002.12.05
Microsoft SQL SERVER