PNG in zuschneiden und in Datei speichern

[hedie]

Hat sich erledigt...

Delphi-Quellcode:

von := Rect(470, 55, 815, 375);
  nach := Rect(0, 0, 345, 320);

  TempImage := TBitmap.Create;
  TempImage.Height := 320;
  TempImage.Width := 345;


  TempImage.Canvas.CopyRect(nach,TPngImage(Image1.Picture.Graphic).Canvas,von);