Delphi-PRAXiS - Delphi Bitmap ungülig

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)

- - Delphi Bitmap ungülig (https://www.delphipraxis.net/131102-bitmap-unguelig.html)

Hallo

kann jemand mir sagen, was das Problem sein könnte?
Ich versuche ein Image in das andere zu kopieren. Es geht aber mit einer Meldung "Bitmap ist ungültig"

Ich kopiere Image2 in Image1 mit diesem Code :

Delphi-Quellcode:

			Image2.Picture.Bitmap.PixelFormat := pf24bit;

Image1.Canvas.StretchDraw(Rect(Image2.Left,Image2.Top,Image2.Left+Image2.Width,Image2.Top+ Image2.Height), Image2.Picture.Bitmap);

Re: Bitmap ungülig

Delphi-Hilfe:

Beschreibung

Mit StretchDraw können Sie eine Grafik genau in ein angegebenes Reckteck einpassen. StretchDraw ruft die Methode Draw der Grafik auf. Auf welche Weise die Grafik in das Rechteck eingepaßt wird, hängt vom jeweiligen Grafikobjekt ab. Unter Umständen ändern sich dabei der Vergrößerungsfaktor und/oder das Seitenverhältnis.

Beschreibung

Mit CopyRect können Sie einen Teil eines Bildes aus einer anderen Zeichenfläche in das Bild des TCanvas-Objekts kopieren. Die Eigenschaft Dest legt fest, in welches Rechteck innerhalb der Zeichenfläche das Quellbild kopiert werden soll. Der Parameter Canvas gibt die Zeichenfläche an, die das zu kopierende Bild enthält. Source legt das Rechteck fest, das den zu kopierenden Teil der Zeichenfläche enthält.