Ĺadny brzuch
Prosze o kawałek kodu programowego.
1. Pobranie informacji o kolorze canvasa RGB np.(120,45,200)
2. Przypisanie zmiennym (niech bedzie R1, G1, B1) wartości RGB.
Wiem że to jest proste :D ale normalnie nie wiem jak to zrobic! :blink:
var r, g, b:byte; kolor:integer; begin kolor:=Canvas.Pixels[10,10]; r:=GetRValue(kolor); g:=GetGValue(kolor); b:=GetBValue(kolor); end;var r, g, b:byte; kolor:integer; begin r:=120; g:=45; b:=200; kolor:=RGB(r,g,b); end;
Dzieki. Jak sprawdze to powiem czy działa. To jest dziwne ale ten sam kod u kogoś moze działas idealnie a u kogoś innego nie działa i trza dociekac gdzie tkwi feler. Coż wszystkie programy tworzą ludzie. ;)
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
1. Pobranie informacji o kolorze canvasa RGB np.(120,45,200)
2. Przypisanie zmiennym (niech bedzie R1, G1, B1) wartości RGB.
Wiem że to jest proste :D ale normalnie nie wiem jak to zrobic! :blink:
var r, g, b:byte; kolor:integer; begin kolor:=Canvas.Pixels[10,10]; r:=GetRValue(kolor); g:=GetGValue(kolor); b:=GetBValue(kolor); end;var r, g, b:byte; kolor:integer; begin r:=120; g:=45; b:=200; kolor:=RGB(r,g,b); end;
Dzieki. Jak sprawdze to powiem czy działa. To jest dziwne ale ten sam kod u kogoś moze działas idealnie a u kogoś innego nie działa i trza dociekac gdzie tkwi feler. Coż wszystkie programy tworzą ludzie. ;)