Bestimmten Bereich eines Bildes ausschneiden?

[OrNEC]

Hallo Jungs,

ich habe ein Image1 und Image2 auf dem Form liegen, nun möchte ich einen rechteckigen Teil aus Image1 ausschneiden und in Image2 anzeigen. Wie kann ich das anstellen? Muss zugeben, dass ich mit Grafik noch wenig was gemacht habe.

Habe leider im Image2 nur schwarze Fläche

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  Quelle, Ziel: TRect;
begin
  Quelle := Rect(Image1.Left, Image1.Top, Image1.Left + 100, Image1.Top + 100);
  Ziel := Rect(Image2.Left, Image2.Top, Image2.Width, Image2.Height);
  Image2.Canvas.CopyRect(Ziel, Image1.Canvas, Quelle);
end;

Vielen Dank!

[DeddyH]

Die Zielkoordinaten sind relativ zum Zielcanvas. Wenn Du die also auf dessen Width und Height setzt, bist Du an der rechten unteren Ecke. Klar, dass man dann nichts sieht.

[OrNEC]

Zitat von DeddyH:

Die Zielkoordinaten sind relativ zum Zielcanvas. Wenn Du die also auf dessen Width und Height setzt, bist Du an der rechten unteren Ecke. Klar, dass man dann nichts sieht.

Eh... kapiere ich nicht...

[DeddyH]

Ziel := Rect(0, 0, Image2.Width, Image2.Height);

[OrNEC]

Zitat von DeddyH:

Ziel := Rect(0, 0, Image2.Width, Image2.Height);

Ok... bleibt aber weiterhin schwarz.

[DeddyH]

Dann schau Dir die Quellkoordinaten nochmal an.