Einzelnen Beitrag anzeigen

ak1

Registriert seit: 12. Okt 2003
243 Beiträge
 
#12

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

  Alt 18. Okt 2004, 15:22
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;
  Mit Zitat antworten Zitat