Главная страница
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-14610
PaRL
2002-11-23 09:55
2002.12.05
Бред какой-то


1-14674
lob
2002-11-23 18:12
2002.12.05
как нужной мне переменной применить значение TItemChange


3-14453
DmitryMN
2002-11-18 18:30
2002.12.05
Excel и MS SQL


4-14857
^Sanya
2002-10-23 20:33
2002.12.05
Как вырубить процесс...


1-14570
Vcoder
2002-11-23 20:22
2002.12.05
TCanvas.ClipRect : как изменить?