Hallo,
Ich habe ein TBitmap das 200*200 Pixel groß ist.
Ich habe es Grafik gennant
(grafik: TBitmap
durch den folgenden code wird eine bestemmte farbe (farbe_alt) durch eine neue ersetzt.
Leider dauert das ewig. kennt ihr eine schnellere Methode?
Delphi-Quellcode:
for i:=0 to Grafik.width do
for i2:=0 to Grafik.height do
if Grafik.Canvas.Pixels[i,i2]=alt_farbe then
Grafik.Canvas.Pixels[i,i2]:=colordialog.color;