Image save to jpeg

← →
madmike © (2002-11-28 12:50) [0]

Есть рисунок в Image, как его сохранить в jpeg"e? BMO много жрет....

← →
MBo © (2002-11-28 12:58) [1]

TJpegImage (не забудь uses jpeg)

← →
madmike © (2002-11-28 13:22) [2]

Спасибо, почти разобрался... Тока вот как мне IMAGE _преобразовать_ в jpeg, если загружен BMP.

← →
MBo © (2002-11-28 13:25) [3]

jpegimage.assign(bmp)

← →
madmike © (2002-11-28 14:47) [4]

Во время этой операции "jp.assign(Image1.Picture.Bitmap);" выдает ошибку(jp: TJpegImage;)
В Image1 БМП грузится из клипбоарда...
Может подскажешь как корректно загрузить из буфера картинку в jp... Команда LoadFromClipBoardFormat(). Не получается ей воспользоваться..

← →
MBo © (2002-11-28 14:56) [5]

для случая, когда в буфере битмап
jp:=tjpegimage.create;
b:=tbitmap.create;
if clipboard.HasFormat(cf_bitmap) then begin
b.assign(clipboard);
jp.assign(b);
end;

← →
Аслан (2003-02-22 14:21) [6]

мне нужны компьютерные рисунки!

← →
Dimon (2003-03-05 03:11) [7]

jpg:=TJpegImage.Create;
jpg.Assign(Image1.Picture.Graphic);
jpg.CompressionQuality:=100;
jpg.Compress;
jpg.SaveToFile(ChangeFileExt(FileName, ".jpg"));
jpg.free;

← →
afafafa (2003-03-06 21:32) [8]

VAR
Bubba: TJpegImage;
BEGIN
Bubba.Create;
bubba.assign(image1.picture.bitmap);
bubba.savetofile("padel.jpg");
end;

Image save to jpeg Найти похожие ветки