Åbne JPG, compress 80%, gemme igen

Hej,

Jeg har et problem. Jeg vil åbne et JPG billede, og gemme det med kompressionsgraden 80% og har følgende kode dertil:

----
  public
    { Public declarations }
    LoadedJPGimage: TJpegImage;
----
TForm1.FormCreate(Sender: TObject);
begin
LoadedJPGimage := TJpegImage.Create;
end;
----
  LoadedJPGimage.LoadFromFile('c:\image1.jpg');
  LoadedJPGimage.PixelFormat := jf24Bit;
  LoadedJPGimage.CompressionQuality := 80;
  LoadedJPGimage.Compress;
  LoadedJPGimage.SaveToFile('newimage1.jpg');
----

Men filen der bliver oprettet er tom, dvs. 0 bytes.

Jeg har også prøvet at assign'e den med sig selv:

  LoadedJPGimage.Assign(LoadedJPGimage);

men det hjælper ikke.

Det går fint hvis jeg åbner en Bitmap fil og "konverterer" den til JPG, men det er jo ikke det jeg skal bruge.

Nogen forslag?

MVH
Futterama