[PYTHON] Liste des couleurs pouvant être définies avec tkinter (mémorial)

Déclencheur

J'écris une petite application en Python.

J'ai adopté tkinter pour l'interface utilisateur et j'ai procédé à l'implémentation, mais la conception ne rappelle que les applications Windows (telles que VB) il y a 20 ans. .. ..

J'ai donc pensé au moins que je voulais donner une belle apparence à la couleur, mais je ne peux pas utiliser RVB! ?? Il semble qu'il existe une constante pour l'agencement des couleurs propre à Tkinter. .. ..

Site de référence 1

J'ai cherché dans la liste et j'ai frappé cette page: https://www.tcl.tk/man/tcl8.4/TkCmd/colors.htm

Il est répertorié sous forme de texte, mais il est très difficile à comprendre. Oui, rendons les choses plus faciles à voir!

Liste des constantes et des couleurs

J'ai rendu possible la vérification de la couleur à l'aide d'Excel VBA. Le résultat est une image, donc pour votre référence.

• L'image téléchargée a été remplacée par un lien vers l'image compressée (?) Par Qiita. Si vous souhaitez voir le fichier image fermement, veuillez cliquer sur l'URL ci-dessous.

https://www.zero-one-system.co.jp/wp-content/uploads/2020/06/tkinter_colors.png

Site de référence 2

À la suite de diverses recherches, après avoir terminé la création de l'image ci-dessus, j'ai trouvé le site suivant: https://stackoverflow.com/questions/4969543/colour-chart-for-tkinter-and-tix

Si vous exécutez le code Python, vous pouvez tout voir.

À propos d'Excel VBA

C'est un bonus complet, mais je vais le mettre ici.

Code VBA:

GenerateColor.xlsm

Private Sub CommandButton1_Click()
    'Définition variable
    Dim n_row_st As Integer
    Dim n_col_nm As Integer
    Dim n_col_r As Integer
    Dim n_col_g As Integer
    Dim n_col_b As Integer
    
    Dim n_col_bg As Integer
    
    Dim i, n, m As Integer
    
    'Réglage variable
    n_row_st = 5
    n_col_nm = 2
    n_col_r = 3
    n_col_g = 4
    n_col_b = 5
    n_col_bg = 7
    
    'Obtenez la couleur d'arrière-plan de RVB et définissez
    i = 0
    Do Until Cells(n_row_st + i, n_col_nm).Value = ""
        Cells(n_row_st + i, n_col_bg).Interior.Color = _
            RGB(Cells(n_row_st + i, n_col_r).Value _
               , Cells(n_row_st + i, n_col_g).Value _
               , Cells(n_row_st + i, n_col_b).Value)
        i = i + 1
    Loop
    
    'la fin
    Call MsgBox("OK")
    
End Sub

Si quelqu'un veut un tel VBA, veuillez nous le faire savoir dans les commentaires. Je vais le télécharger quelque part.