Discussion :

[wheel]

Par exemple, vu la taille des disques actuels, si je veux une marge de sécurité vers le haut je vais choisir une variable de type QWord (unsigned) car une variable Int64 me fera perdre toute la range 0...-92233..., étant entendu qu'il ne peut pas y avoir de tailles négatives dans ce domaine.
Mais si tu travailles dans le bancaire, tu devras choisir des variables signées car tu pourras avoir des soldes négatifs, des fois.

Le cas le plus fréquent c'est la comparaison entre les type signés et non signés ou dans les conditions des boucles par exemple plusieurs fonctions renvoient -1 et si on utilise ça avec un type non signé la condition ne se réalisera jamais heureusement dans certains cas le compilateur les signale mais pas tous.

Mais un Integer qui va de -N à +N est-il un nombre signé ? (juste pour m'assurer que j'ai bien tout compris).

Oui c'est ça en VB6 Long et Integer sont signés et Byte non signé sur un octet..

Pour revenir au sujet initial de la discussion j'ai constater qu l'utilisation de la contraste et plus pertinent que la luminance et s'adapte bien aux différentes nuances des couleurs ..



test sur VBA Excel

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
Private Declare Function GetSysColor Lib "user32" (ByVal ColIdx As Long) As Long
 
Private Function Ct(ByVal Value As Long, ByVal A As Integer) As Long
Dim m As Long
    m = (Abs(127 - Value) * A) \ 255
    Ct = IIf(m > 127, Value - m, Value + m)
    If Ct > 255 Then
        Ct = 255
    ElseIf (Ct < 0) Then
        Ct = 0
    End If
End Function
 
Function ChangerContrast(ByVal aColor As Long, ByVal ALevel As Integer) As Long
  Dim R As Byte, G As Byte, B As Byte
  If aColor < 0 Then
     aColor = GetSysColor(aColor And &HFF)
  End If
  R = aColor And &HFF
  G = (aColor \ &H100) And &HFF
  B = (aColor \ &H10000) And &HFF
  ChangerContrast = RGB(Ct(R, ALevel), Ct(G, ALevel), Ct(B, ALevel))
End Function
 
Private Sub ScrollBar1_Change()
 
  CommandButton1.ForeColor = ChangerContrast(CommandButton1.BackColor, ScrollBar1.Value)
End Sub

[MarcVB6]

Bonjour,
Merci pour vos réponses.

Je n'aurais pas dit ça comme ça, parce que ça n'a pas d'importance.
Ce qui est important, c'est l'étendue possible des valeurs, et donc tu choisiras tes variables en conséquence.

Oui bien sûr. C'était juste pour m'assurer que je n'avais pas loupé une étape.

Pour revenir au sujet initial de la discussion j'ai constater qu l'utilisation de la contraste et plus pertinent que la luminance et s'adapte bien aux différentes nuances des couleurs ..

Effectivement, oui c'est surprenant.

MarcVB6

[Jipété]

Pour revenir au sujet initial de la discussion j'ai constaté que l'utilisation du contraste est plus pertinente que la luminance et s'adapte bien aux différentes nuances des couleurs...

Effectivement, oui c'est surprenant.

(réécrit en français pour une meilleure compréhension)

Mais surtout, on compare là deux choses qui ne jouent pas dans la même cour : le contraste c'est l'écart entre une teinte claire et une teinte sombre et au plus il est élevé, cet écart, au plus on va gagner en lisibilité, ce qui est quand même le but recherché, quand il est question de faire passer un message écrit/imprimé.

La luminance c'est autre chose : La luminance est une grandeur correspondant à la sensation visuelle de luminosité d'une surface... En pratique la luminance d'un écran peut être modifiée globalement de façon proportionnelle à l'aide du réglage du contraste.
Source, mais prévoir un tube d'aspirine...

[MarcVB6]

La luminance c'est autre chose : [I]La luminance est une grandeur correspondant à la sensation visuelle de luminosité d'une surface...

Je pense que wheel voulait dire 'Luminosité'.
Pour en revenir au sujet de départ, comme le proposait vttman en tapant "Building your own color contrast checker" sous Google j'ai trouvé ici la formule pour retrouver la luminosité d'une couleur unique. (Celle du texte d'un Label dans mon cas.)
Ca marche très bien. J'obtiens un résultat L qui va de 0 à 1. Basiquement, si L < 0.5 je mets le BackColor du Label au blanc. Si L > 0.5 je mets le BackColor au noir.
Il faut que je fasse des tests avec plein de différentes couleurs afin d'affiner la condition pour un coef de 0.5. Car, visuellement parlant, un texte sur fond noir est plus lisible que sur fond blanc. La condition avec un coef de 0.4 fonctionne aussi.

Mais la conversation a évolué et c'est très instructif et passionnant. (J'ai arrêté de compter les tubes d'aspirine )
Dans la proposition de wheel, il est vrai que mettre une couleur plutôt que du noir ou blanc dans le BackColor est plus esthétique mais le contraste est moins marqué, visuellement parlant.

Bonne journée
MarcVB6

[Jipété]

Car, visuellement parlant, un texte sur fond noir est plus lisible que sur fond blanc.

Ça se discute...
Pourquoi le papier est-il blanc ?
Mais surtout, pourquoi les panneaux routiers, qui n'existaient pas du temps du parchemin, sont-ils, la plupart du temps, également blancs, avec le texte noir ?


source

Mais la conversation a évolué et c'est très instructif et passionnant. (J'ai arrêté de compter les tubes d'aspirine )

Tu marches dans mes pas, lol !
On dirait le sujet de 2017 dont j'ai donné le lien.

[MarcVB6]

Ça se discute...
Pourquoi le papier est-il blanc ?

Je n'ai pas de réponse scientifique à cette question mais vu de ma fenêtre je dirais que (peut être) il est plus facile et moins onéreux de faire du papier blanc (qui ne nécessite pas d'encre mais un peu de chlore) que du papier noir (qui en nécessite) ?
Et que, de fait, ça demande (au total) moins d'encre pour imprimer sur du blanc que sur du noir ?

Mais surtout, pourquoi les panneaux routiers, qui n'existaient pas du temps du parchemin, sont-ils, la plupart du temps, également blancs, avec le texte noir ?

Je donne ma langue au chat. Peut être à cause de la lumière ambiante qui est claire ? La nuit, pour les panneaux réfléchissants, c'est le texte qui est réfléchissant, donc plus clair.

Mais à l'inverse pourquoi les salle de spectacles sont-elles toujours dans l'obscurité et la scène éclairée ?
Pourquoi les salles de cinéma sont-elles dans l'obscurité ?
"Ah contraste quand tu nous tiens."

Tu marches dans mes pas, lol !
On dirait le sujet de 2017 dont j'ai donné le lien.

Oui j'ai vu, c'est un travail impressionnant.

Bonne journée.
MarcVB6

[Pierre Fauconnier]

Un octet est toujours positif[...]

[...]et Byte non signé sur un octet.[...]

Je ne suis pas d'accord. Même si la documentation de Microsoft dit que une variable "As Byte" est non signée, un octet n'est pas toujours positif. C'est le contexte qui décidera que l'octet est signé ou pas. Il faut faire la différence entre As Byte (particularité du VB qui fait qu'une variable As Byte est toujours un nombre positif) et "un octet", qui n'a rien à voir avec VB, et qui sera positif si le bit de poids fort est à 0, et positif ou négatif selon le contexte si le bit de poids fort est à 1.

10110111 peut représenter 183 OU -73 selon le contexte. C'est toujours le contexte qui détermine si le nombre est signé ou pas. Sans le contexte, on ne peut pas affirmer que 10110111 ne vaut QUE 183.


D'ailleurs, Jipété parlait plus haut des VRAI ou FAUX, avec VRAI qui vaut -1, car -1 en binaire, c'est 11111111 (tous les bits à 1 pour un octet SIGNÉ), par opposition à FAUX = 0 = 00000000 (tous les bits à 0).