Chciałbym przedstawić sposób na zabarwienie obrazka jednym kolorem. Procedura najpierw oblicza wartość nasycenia wybranego koloru, a następnie usuwa dwa pozostałe. Ze względu na powolne działanie, procedura sprawdza się bardzo dobrze jedynie przy obrazkach niewielkich rozmiarów.
[crayon-6511c5a8c0471218695811/]
W tej procedurze zabarwiamy rysunek na czerwony, aby wykonać to dla barwy zielonej lub niebieskiej wystarczy zmienić Pixels[x,Y]:=RGB(Nasycenie,0,0); na :
zielony : Pixels[x,Y]:=RGB(0,Nasycenie,0);
niebieski : Pixels[x,Y]:=RGB(0,0,Nasycenie);
Autor: NakielNakiel