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

Вниз

как сохранить Jpeg в базе данной   Найти похожие ветки 

 
Gleb ©   (2002-08-17 23:23) [0]

Помогите пожалуйста. Как сохранить графику в формате jpg в Базе данной (Paradox) но не превращая её в BMP. И какое для этого нужно поле.


 
Lola ©   (2002-08-18 13:49) [1]

Включаешь в Uses Jpeg.

var
Ms: TMemoryStream;
Jp: TJpegImage;
begin
Table1.Edit;
Jp:=TJpegImage.Create;
Jp.Assign(Image1.Picture.Bitmap); //Помещаешь изображение в класс TJpegImage;
Ms:=TMemoryStream.Create;
Jp.SaveToStream(Ms); // Сохраняешь Jpeg в потоке
Ms.Seek(0,0);
Table1PHOTO.LoadFromStream(Ms); //Загружаешь Jpeg в поле через поток
Ms.Free;
Jp.Free;
Table1.Post;
end;




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

Текущий архив: 2002.09.05;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.011 c
1-14123
Demon[DZ]
2002-08-23 16:20
2002.09.05
Ошибка с ДЛЛ


14-14279
Delirium
2002-08-12 17:13
2002.09.05
Delphi 7 Studio


1-14066
Monstros
2002-08-26 20:54
2002.09.05
Люди умоляю! Помогите, бочку пива поставлю…


1-14026
KPY
2002-08-26 14:35
2002.09.05
Помогите c RichEdit


14-14262
VID
2002-08-09 15:47
2002.09.05
Нужен навороченый RichEdit