|
Registriert seit: 24. Feb 2003
Ort: Graz (A)
705 Beiträge
Delphi 7 Enterprise
|
Re: Jpegs : Qualität verringern
2. Sep 2003, 15:43
Hallo,
versuche mal
1. jpeg.LoadFromFile(FileNameVon);
2. jpeg.CompressionQuality := 50; //100 ist Standard
3. jpeg.Compress;
4. jpeg.SaveTofile(FileNameNach+'.jpg');
Armin P. Pressler 
BEGIN
...real programmers are using C/C++ - smart developers Delphi;
END;
|