Update Problem bei TImage

[negaH]

Tja das is'es wieder, das Problem mit den TJpegImages und deren ziemlich abgespecktem Interface. Leider unterstützen die TJpegImage's nicht alle wichtigen Features.

Am besten mal folgendes probieren

Delphi-Quellcode:

  with Img.Picture.Bitmap do
  begin
    Width := Image1.Picture.Width;
    Height := Image1.Picture.Height;
    Canvas.Draw(0, 0, Image1.Picture.Graphic);
  end;
  Image1.Picture.SaveToFile(...);

Statt Img zu speichern, wird es nur zur Anzeige benutzt. Wir speichern aus Image1 heraus.

Gruß Hagen