Hallo,
ich möchte ein Bild von einer TPaintbox in ein TImage kopieren.
Habe dafür folgenden Code geschrieben, der auch funktioniert:
Delphi-Quellcode:
bild2: TImage;
bild: TPaintBox;
...
for y:=1 to bild.height do for x:=1 to bild.width do bild2.Canvas.Pixels[x,y]:=bild.Canvas.Pixels[x,y];
Aber geht das nicht auch irgendwie über "Assign" oder so? Habe das leider nicht hinbekommen...
Danke schonmal!