Spanish Encontrar todos los tonos del color rojo (y azul y verde) en una imagen

javierfs

Member
Licensed User
Longtime User
Hola, estoy escribiendo un programilla que me detecte tres cuadrados de diferentes colores (rojo, azul y verde) en una fotografía.

Utilizo getPixel, y desearía poder leer toda la gama, es decir, si no es rojo exacto que me lo tome como rojo.

También me gustaría poder controlar el brillo y el contraste con un slider para poder arreglar la mencionada foto.

¿me podéis echar una mano?

Muchas gracias anticipadas
 

jota

Active Member
Licensed User
Longtime User
yo uso esta funcion para saber el alfa, rojo,verde y azul de cada color pero el tema de brillo y contraste ni idea.


Sub GetARGB(Color As Int) As Int()
Dim res(4) As Int
res(0) = Bit.UnsignedShiftRight(Bit.And(Color, 0xff000000), 24) 'Alpha
res(1) = Bit.UnsignedShiftRight(Bit.And(Color, 0xff0000), 16) 'Rojo
res(2) = Bit.UnsignedShiftRight(Bit.And(Color, 0xff00), 8) 'Verde
res(3) = Bit.And(Color, 0xff) 'Azul
Return res
End Sub
 
Cookies are required to use this site. You must accept them to continue using the site. Learn more…