[R] Une image est-elle plus blanche ou plus noire ?

[Rancar]

Bonsoir,

Je suis en train de réaliser un petit projet en AutoIT et pour cela, j'aurais besoin de savoir comment faire pour déterminer si une image est plus blanche ou plus noire afin de pouvoir poser dessus un label de la couleur opposé (afin que celui-ci soit visible car du blanc sur du blanc...)
J'ai regardé du côté de PixelChecksum pour détermine la couleur moyenne du bas droit d'une image (ou de l'écran c'est encore mieux) mais ça ne m'avance pas du tout...

Auriez-vous une idée ?
Merci d'avance.

Cordialement,
Rancar

[jguinch]

Je suis pas un pro de GDI+ mais bon...
En fait, je pense qu'il faut que tu détermines la couleur moyenne de ton image. Pour ça, j'ai trouvé des scripts, mais ils sont très longs car ils parcourent toute l'image pixel par pixel...
Mon idée serait plutôt de dupliquer et redimensionner l'image en une image de 1 pixel x 1 pixel : du coup le ré-échantillonnage te donnerait un pixel de couleur "moyenne" approximative.
Je ne sais pas si cette technique sera vraiment fiable, mais tu peux essayer.

Je t'ai fait un petit bout de script, si tu veux regarder. Ma fonction _ImageAverageColor retourne la couleur moyenne (en utilisant le redimensionnement de 1x1) au format RRGGBB.
Il te restera (si ça convient) à déduire d'après cette valeur si l'image est plutôt claire ou plutôt foncée.

► Afficher le texte

Code : Tout sélectionner

#Include <WinApi.au3>
#include <GDIPlus.au3>


$picture = FileOpenDialog("image", @ScriptDir, "Images (*.jpg)")
If $picture = "" Then Exit

$color = _ImageAverageColor($picture)
MsgBox(0, "", $color)

Func _ImageAverageColor($sInImage)
        Local $hWnd, $hDC, $hBMP, $hImage1, $hImage2, $hGraphic, $result
        ; Win api to create blank bitmap at the width and height to put your resized image on.
        $hWnd = _WinAPI_GetDesktopWindow()
        $hDC = _WinAPI_GetDC($hWnd)
        $hBMP = _WinAPI_CreateCompatibleBitmap($hDC, 1, 1)
        _WinAPI_ReleaseDC($hWnd, $hDC)
        ;Start GDIPlus
        _GDIPlus_Startup()
        ;Get the handle of blank bitmap you created above as an image
        $hImage1 = _GDIPlus_BitmapCreateFromHBITMAP($hBMP)
        ;Load the image you want to resize.
        $hImage2 = _GDIPlus_ImageLoadFromFile($sInImage)

        
        $result = StringRegExpReplace( Hex(_GDIPlus_BitmapGetPixel($hImage2, 0, 0) ), ".*(.{6})$", "$1")
                
        _GDIPlus_ImageDispose($hImage1)
        _GDIPlus_ImageDispose($hImage2)
        _WinAPI_DeleteObject($hBMP)
        _GDIPlus_Shutdown()
        
        
        Return $result
EndFunc   ;==>_ImageAverageColor

 

L'idéal serait même de trouver la couleur moyenne non pas pour l'image complète mais uniquement pour la zone concernée (là où tu veux mettre le texte). Tu pourra utiliser _GDIPlus_BitmapCloneArea pour ça.

Bon, c'est du bricolage, mais j'ai pas trouvé mieux

[Rancar]

Tout d'abord, merci de votre réponse

Premièrement, je n'ai pas très bien compris la différence entre votre fonction et "PixelChecksum" qui devrait aussi retourner la couleur moyenne, non ?

Deuxièmement, comment faire pour déterminer si la valeur 0x...... est plus noire ou plus blanche ? ^^

[jguinch]

PixelChecksum calcul le checksum d'une zone de l'écran. Ma fonction calcul la couleur moyenne d'une image.
C'est bien ça que tu voulais ?

Pour déduire si la couleur est plutôt noire ou plutôt blanche, ça devrait être assez simple. Il faut, je pense, faire la moyenne des trois couleurs, puis tester si cette moyenne est plus proche de "00" (noir) ou "FF" (blanc) - sachant que la tranche du foncé va de "00" à "77" et la tranche du clair de "88" à "FF".
Ainsi, on peut imaginer un truc du genre :

Code : Tout sélectionner

$color = "FC2398"
; Si (FC + 23 + 98 ) /3 est inférieur ou égal à la valeur "77" (hexa), alors c'est foncé, sinon clair
$tendance = ( (Dec ( StringMid($color, 1, 2) ) + Dec ( StringMid($color, 3, 2) ) + Dec ( StringMid($color, 5, 2) ) ) / 3 <= Dec("77") ) ? ("noir") : ("fonce")
MsgBox(0, "", $tendance)

[jchd]

A noter que pour convertir une couleur de RGB en niveau de gris en respectant la subtilité de la perception visuelle humaine, puisque cela semble être une étape vers le but, il faut pondérer les composantes RGB. La chose est subjective et il existe plusieurs standards de représentation des couleurs et, du coup, au moins autant de méthodes de conversion. Un point d'entrée élémentaire sur le sujet.

Pour faire des sous-titres lisibles, on peut aussi mettre le sous-titre sur un fond de couleur et transparence adaptées. On voit ça souvent à la télé, par exemple. Pour moi, c'est la solution la plus efficace.

[Rancar]

Jguinch, votre version semble fonctionner parfaitement !
Merci beaucoup

Jchd > Ce n'est pas très esthétique d'avoir un fond couleur sur un label positionné une image :/
Mais en tout cas, c'est plus facile à mettre en place ^^

Sujet résolu, encore merci