색상 이름을 표시하는 색상 선택 도구

Question

표준 색상의 이름을 표시하는 Visual Studio (Visual Basic) 용 color-picker을 아는 사람이 있습니까?

예를 들어 Visual Studio에서 "Custom", "Web" 및 "System"의 탭을 가진 color-picker을 사용하여 컨트롤의 색을 변경할 수 있습니다. Web & System 옵션은 색 이름 목록을 표시하는 반면 Custom은 (주로) RGB (VB ColorPicker 컨트롤이하는 기능)를 제공합니다.

감사합니다.

Answer 1

당신이 VS와 같은 기능을 원하고 Named Colors와 다른 방식으로 시스템 색상을 나타내기를 원할 때까지 이것들 중 하나는 귀중한 것입니다. 예 배경으로 색상을 사용하여 :

' capture the names 
Private _Colors As String() 

' get the names 
' add qualifiers to skip SystemCOlors or 
' Transparent as needed 
Function GetColorNames As String() 
    For Each colorName As String In KnownColor.GetNames(GetType(KnownColor)) 
     _Colors.Add(colorName) 
    End If 
Next 

' post the names to a CBO: 
cboBackColor.Items.AddRange(_Colors) 

양식 CBO에, 다음, OwnerDrawFixed에 DrawMode을 설정

Private Sub cboSheetBackColor_DrawItem(ByVal sender As Object, 
      ByVal e As System.Windows.Forms.DrawItemEventArgs) 
      Handles cboSheetBackColor.DrawItem 
    Dim Bclr As Color, Fclr As Color 

    ' get the colors to use for this item for this 
    Bclr = Color.FromName(_Colors(e.Index).ToString) 
    Fclr = GetContrastingColor(Bclr)  ' see below 

    With e.Graphics 
     Using br As New SolidBrush(Bclr) 
      .FillRectangle(br, e.Bounds) 
     End Using 
     Using br As New SolidBrush(Fclr) 
      .DrawString(cboSheetBackColor.Items(e.Index).ToString, 
      cboSheetBackColor.Font, br, 
      e.Bounds.X, e.Bounds.Y) 
     End Using 

    End With 
    e.DrawFocusRectangle() 

End Sub 

당신은 그냥 윈도우/VS 같은 견본을 않는 그릴 수를 정의하여 채울 직사각형. 일반적으로 그 정도는 커지지 만, 배경색을 정의하는 것과 같은 일을하는 경우 약간의 견본보다 텍스트에 더 많은 색상을 표시하는 데 도움이됩니다. 따라서 채워진 CBO 항목 rect.

표준 창 텍스트 색상이 모두 표시되지 않습니다. "밝은"테마의 경우, 보라색과 검정색 등은 색 이름을 숨기거나 읽을 수 없게합니다. GetContrastingColor는 현재 색상의 밝기를 평가하는 기능이며, 다음 흰색 또는 검은 색 중 하나를 반환

Public Function GetContrastingColor(ByVal clrBase As Color) As Color 
    ' Y is the "brightness" 
    Dim Y As Double = (0.299 * clrBase.R) _ 
      + (0.587 * clrBase.G) _ 
      + (0.114 * clrBase.B) 

    If (Y < 140) Then 
     Return Color.White 
    Else 
     Return Color.Black 
    End If 
End Function 

그런 다음 콤보 상자에서 상속 클래스에있는 모든이를 사용하거나 별개의 컨트롤과 같은 UserControlif 당신을 구축 할 수 있습니다. 이러한 경우에 호출되는 DLL에 코드로 남겨 둘 수도 있습니다. 나는 CodeProject에 대해 아마도 12 명의 그런 생물을 언급 할 것이다.

Answer 2

기존 컨트롤에 대해서는 잘 모르겠지만 KnownColor 열거 형과 SystemColors 클래스를 사용하면 Color 값의 모든 이름을 가져올 수 있습니다. 그런 다음 자신 만의 컨트롤을 만들 수 있습니다 (예 : 맞춤 ComboBox (해당 데이터 포함).