Salut !
Les valeurs de type color sont des entiers qui codent les couleurs au format RRGGBB. On peut donc retrouver les composantes avec une fonction comme celle-ci :
let get_rgb x = (x lsr 16) land 255, (x lsr 8) land 255, x land 255
Dans le cas présent, on retrouve bien la couleur jaune (à tester dans l'interpéteur) :
1 2 3 4
|
# get_rgb 16776960;;
- : int * int * int = (255, 255, 0)
# |
Les opérateurs land (l'équivalent en C doit être &) et lsr (l'équivalent en C doit être >>) agissent sur les bits. Au besoin voir la documentation pour plus d'infos.
Cordialement,
Cacophrène
Partager