Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Multimedia (https://www.delphipraxis.net/16-multimedia/)
-   -   Delphi Ein Rechteck auf TBitmap.Canvas mit transparenter Farbe? (https://www.delphipraxis.net/32063-ein-rechteck-auf-tbitmap-canvas-mit-transparenter-farbe.html)

Shaman 18. Okt 2004 15:12

Re: Ein Rechteck auf TBitmap.Canvas mit transparenter Farbe?
 
Hoi

Über Canvas.Pixels[X, Y] hast Du Zugriff auf die Farbwerte der Pixel, jedoch ist das verdammt langsam. Mit ScanLine wird es schneller gehen.

Gruss
Shaman

ak1 18. Okt 2004 15:22

Re: Ein Rechteck auf TBitmap.Canvas mit transparenter Farbe?
 
Najajuuut Ben, du hattest recht. Das ist wirklich ziemlich einfach.

Da meine Zeichnung nur aus drei Farben besteht habe ich das ziemlich simpel gelöst.

Code:
farbe_neu:=clskyblue;

  for i2:= oben to unten do begin
       
     for i:=links to rechts do begin
        farbe_alt:= Bitmap.Canvas.Pixels[i, i2];

        if farbe_alt = clwhite then
          Bitmap.Canvas.Pixels[i, i2]:=farbe_neu;

     end;

  end;


Alle Zeitangaben in WEZ +1. Es ist jetzt 12:18 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz