scanline nur für's Datenlesen?

[p80286]

Hallo zusammen,

für eine kleine Spielerei wollte ich ein Bild kopieren:

Delphi-Quellcode:

   bild1:=Ico2Bmp(efile);
   bild2:=TBitmap.Create;
   bild2.Height:=(bild1.Height*2)+1;
   bild2.Width:=(bild1.Width*2)+1;
   for i:=0 to bild1.height-1 do begin
      psc1:=bild1.Scanline[i];
      psc2:=bild2.scanline[i];
      for j:=0 to bild1.Width-1 do begin
        psc2^[j]:=psc1^[j];
      end;
   end;

hat so nicht funktioniert, es kam allerdings auch keine Fehlermeldung.

So war ich dann erfolgreich:

Delphi-Quellcode:

...
 for j:=0 to bild1.Width-1 do begin
    Bild2.canvas.pixels[i,j]:=Bild1.canvas.pixels[i,j];
 end;
...

Hab ich da bei Scanline etwas falsch verstanden?

Gruß
K-H