Mentés jpg-be

Mentés jpg-be
2008-10-25T22:15:56+02:00
2008-10-26T21:38:47+01:00
2022-07-30T03:50:29+02:00
udin
Sziasztok!

Pillanatnyilag ezzel mentek fájlba:
Image1.Picture.SaveToFile('valami.bmp');
Ez el is menti szépen, csinál jó nagy méretű fájlt. Ha kicserélem a stringben a kiterjesztést jpg-re, akkor is ugyanakkora fájlt készít.

Hogyan tudnám olyan igazi jpg-s méretben elmenteni a képet?
Mutasd a teljes hozzászólást!
Uses jpeg; ... var Jpg: TJPEGImage; Begin Jpg:= TJPEGImage.Create; Jpg.Assign(Image1.Picture.Bitmap); Jpg.SaveToFile('valami.jpg'); Jpg.Free; End;
Mutasd a teljes hozzászólást!

abcd