Tach nochmal ...
Danke erstmal für die Antworten.
So färbe ich konventionell eine Bitmap (oder Bitmap32)
wie in diesem Beispiel leicht Blau ein.
Delphi-Quellcode:
var x,y,r,g,b: integer; TC: TColor32;
with Bitmap32 do begin
for x := 0 to Width - 1 do
for y := 0 to Height - 1 do begin
TC :=Pixel[x,y];
R := RedComponent (TC);
G := GreenComponent(TC);
B := BlueComponent (TC); B := (B + 255) div 2;
Pixel[x,y] := Color32(R,G,B);
end;
end;
Soweit alles klar ... Allerding dachte ich, das ich dass über Bits
und BlendReg (beides Befehle der gr32-lib) irgendwie eleganter und
vielleicht auch schneller hinbekäme.
Durch blauen Dunst hindurch, grüßt ...