Главная страница
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-14635
IKiller
2002-11-25 11:40
2002.12.05
Пропадают компоненты в палитре


14-14724
Bboy tn
2002-11-12 19:08
2002.12.05
Age Of Wonders II


1-14671
ghost_by
2002-11-24 20:17
2002.12.05
что-то Word XP брыкается!


1-14636
Азазелло
2002-11-25 10:32
2002.12.05
Delphi+CR, передача null в качестве параметра..


1-14639
AlexandrN
2002-11-23 11:59
2002.12.05
Взаимодействие DLL между собой и с EXE