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

[himitsu]

ScanLine liefert zugriff auf die internen Rohdaten der Bilder.
Es kommt also auch darauf an, in welchem Format (wieviele Bits und ob mit ohne Farbtabelle) die Pixel vorliegen. Dementsprechend haben die ScanLines auch eine unterschiedliche Länge ... siehe TBitmap.PixelFormat

Tja, und wenn nun die beiden Bilder je ein anderes Format haben, dann kann es natürlich nicht funktionieren.


PS: TBitMap hat beim erstellen das Format des Bildschrims, also meist 24 Bit (RGB) und das Icon wird bestimmt nur maximal 8 Bit (Farbtabelle) haben.