Bitmap speichern - inkompatibel ?

[DeddyH]

Wieso benutzt Du nicht einfach CopyRect? Außerdem zeichnest Du auf den Canvas des Image, nicht auf den der Bitmap.

[edit] Schau mal, ob Du hiermit etwas anfangen kannst:

Delphi-Quellcode:

function SaveImagePart(const src: TBitmap; //Quellbitmap
                       const x,y,          //Startpunkt
                       iWidth,             //Höhe und Breite
                       iHeight: Integer;
                       sName: TFileName;   //Dateiname zum Speichern
                       PixelFormat: TPixelFormat = pf24Bit): Boolean;
var memBmp: TBitmap;
begin
  Result := False;
  sName := ChangeFileExt(sName,'.bmp');
  memBmp := TBitmap.Create;
  try
    memBmp.Width := iWidth;
    memBmp.Height := iHeight;
    memBmp.PixelFormat := PixelFormat;
    BitBlt(memBmp.Canvas.Handle, 0, 0, iWidth, iHeight, src.Canvas.Handle, x, y, SRCCOPY);
    memBmp.SaveToFile(sName);
    Result := True;
  finally
    memBmp.Free;
  end;
end;

[/edit]