EgtWPFLib5/EgtColorPicker/EgtColorPickerVM.vb

Imports System.Windows.Forms
Imports EgtUILib

Public Class EgtColorPickerVM
   Inherits VMBase

#Region "FIELDS & PROPERTIES"

   Public Event m_CloseWindow(bDialogResult As MessageBoxResult)

   Public ReadOnly Property sTitle As String
      Get
         Return EgtMsg(15059)    ' Color Picker
      End Get
   End Property

   ' Lista nido d'ape colori
   Private m_HexList As New List(Of HexItem)
   Public Property HexList As List(Of HexItem)
      Get
         Return m_HexList
      End Get
      Set(value As List(Of HexItem))
         m_HexList = value
      End Set
   End Property

   ' Lista colori di base con sfumature
   Private m_BasicColorsTheme As New List(Of EgtColorPicker)
   Public Property BasicColorsTheme As List(Of EgtColorPicker)
      Get
         Return m_BasicColorsTheme
      End Get
      Set(value As List(Of EgtColorPicker))
         m_BasicColorsTheme = value
      End Set
   End Property

   ' Lista colori di base
   Private m_BasicColors As New List(Of EgtColorPicker)
   Public Property BasicColors As List(Of EgtColorPicker)
      Get
         Return m_BasicColors
      End Get
      Set(value As List(Of EgtColorPicker))
         m_BasicColors = value
      End Set
   End Property

   'Lista colori costumizzabili
   Private m_CustomColors As New List(Of EgtColorPicker)
   Public Property CustomColors As List(Of EgtColorPicker)
      Get
         Return m_CustomColors
      End Get
      Set(value As List(Of EgtColorPicker))
         m_CustomColors = value
      End Set
   End Property

   Public Sub SetCustomColors(value As Integer())
      Dim coloraRGB As System.Drawing.Color
      Dim colorRGB As Color
      For i As Integer = 0 To value.Length - 1
         coloraRGB = System.Drawing.Color.FromArgb(value(i))
         colorRGB = Color.FromRgb(coloraRGB.R, coloraRGB.G, coloraRGB.B)
         m_CustomColors.Insert(i, New EgtColorPicker(New SolidColorBrush(colorRGB)))
         m_CustomColors.RemoveAt(m_CustomColors.Count - 1)
      Next
      SelCustomColor = m_CustomColors(0)
      NotifyPropertyChanged(NameOf(SelCustomColor))
   End Sub

   Public Function GetCustomColors() As Integer()
      Dim arrayColor As Integer() = New Integer(m_CustomColors.Count - 1) {}
      Dim coloraRGB As System.Drawing.Color
      Dim colorCode As Integer
      For i As Integer = 0 To m_CustomColors.Count - 1
         Dim intValue As Integer = Integer.Parse(m_CustomColors(i).Fill.ToString().Remove(0, 3), System.Globalization.NumberStyles.HexNumber)
         coloraRGB = System.Drawing.Color.FromArgb(intValue)
         colorCode = coloraRGB.ToArgb()
         arrayColor(i) = colorCode
      Next
      Return arrayColor
   End Function

   Private m_CurrColor As Color
   Public ReadOnly Property CurrColor As SolidColorBrush
      Get
         Return New SolidColorBrush(m_CurrColor)
      End Get
   End Property

   ' Colore selezionato dalla lista sfumature
   Private m_SelColorTheme As EgtColorPicker
   Public Property SelColorTheme As EgtColorPicker
      Get
         Return m_SelColorTheme
      End Get
      Set(value As EgtColorPicker)
         m_SelColorTheme = value
         SetCurrColorFill(value.Fill.Color)
         NotifyPropertyChanged(NameOf(SelColorTheme))
         UpdateChangeColor()
      End Set
   End Property

   ' Singolo esagono selezionato
   Private m_sHexSelColor As HexItem
   Public Property sHexSelColor As HexItem
      Get
         Return m_sHexSelColor
      End Get
      Set(value As HexItem)
         m_sHexSelColor = value
         SetCurrColorFill(value.Background.Color)
         NotifyPropertyChanged(NameOf(sHexSelColor))
         UpdateChangeColor()
      End Set
   End Property

   Private m_SelColor As EgtColorPicker
   Public Property SelColor As EgtColorPicker
      Get
         Return m_SelColor
      End Get
      Set(value As EgtColorPicker)
         m_SelColor = value
         m_Fill = value.Fill
         SetCurrColorFill(value.Fill.Color)
         NotifyPropertyChanged(NameOf(SelColor))
         UpdateChangeColor()
      End Set
   End Property

   Private m_CustomColor As EgtColorPicker
   Public Property SelCustomColor As EgtColorPicker
      Get
         Return m_CustomColor
      End Get
      Set(value As EgtColorPicker)
         m_CustomColor = value
         SetCurrColorFill(value.Fill.Color)
         NotifyPropertyChanged(NameOf(SelCustomColor))
         UpdateChangeColor()
      End Set
   End Property

   Private m_Fill As SolidColorBrush
   Public ReadOnly Property Fill As SolidColorBrush
      Get
         Return m_Fill
      End Get
   End Property

   Friend Sub SetCurrColorFill(value As Color)
      m_CurrColor = value
      SetRed(m_CurrColor.R)
      SetGreen(m_CurrColor.G)
      SetBlu(m_CurrColor.B)
      SetHexadecimal(m_CurrColor.ToString)
      NotifyPropertyChanged(NameOf(CurrColor))
   End Sub

   Private m_Hexadecimal As String
   Public Property Hexadecimal As String
      Get
         Return "#" & System.Drawing.Color.FromArgb(CInt(m_Red), CInt(m_Green), CInt(m_Blue)).ToArgb().ToString("X6").Remove(0, 2)
      End Get
      Set(value As String)
         m_Hexadecimal = value
         Dim Color As Color = CType(ColorConverter.ConvertFromString(m_Hexadecimal), Color)
         SetCurrColorFill(Color)
         NotifyPropertyChanged(NameOf(Fill))
         NotifyPropertyChanged(NameOf(Hexadecimal))
      End Set
   End Property

   Friend Sub SetHexadecimal(value As String)
      m_Hexadecimal = value
      NotifyPropertyChanged(NameOf(Hexadecimal))
   End Sub

   Private m_Red As Double
   Public Property Red As String
      Get
         Return DoubleToString(m_Red, 0)
      End Get
      Set(value As String)
         If StringToDouble(value, m_Red) And (m_Red >= 0 AndAlso m_Red <= 255) Then
            UpdateColor(m_Red)
            m_Fill = New SolidColorBrush(Color.FromRgb(CByte(m_Red), CByte(m_Green), CByte(m_Blue)))
            SetCurrColorFill(m_Fill.Color)
            NotifyPropertyChanged(NameOf(Fill))
            NotifyPropertyChanged(NameOf(Red))
         Else
            NotifyPropertyChanged(NameOf(Red))
         End If
      End Set
   End Property

   Friend Sub SetRed(value As Double)
      m_Red = value
      NotifyPropertyChanged(NameOf(Red))
   End Sub

   Private m_Green As Double
   Public Property Green As String
      Get
         Return DoubleToString(m_Green, 0)
      End Get
      Set(value As String)
         If StringToDouble(value, m_Green) And (m_Green >= 0 AndAlso m_Green <= 255) Then
            UpdateColor(CDbl(value))
            m_Green = CDbl(value)
            m_Fill = New SolidColorBrush(Color.FromRgb(CByte(m_Red), CByte(m_Green), CByte(m_Blue)))
            SetCurrColorFill(m_Fill.Color)
            NotifyPropertyChanged(NameOf(Fill))
         Else
            NotifyPropertyChanged(NameOf(Green))
         End If
      End Set
   End Property

   Friend Sub SetGreen(value As Double)
      m_Green = value
      NotifyPropertyChanged(NameOf(Green))
   End Sub

   Private m_Blue As Double
   Public Property Blue As String
      Get
         Return DoubleToString(m_Blue, 0)
      End Get
      Set(value As String)
         If StringToDouble(value, m_Blue) And (m_Blue >= 0 AndAlso m_Blue <= 255) Then
            UpdateColor(CDbl(value))
            m_Blue = CDbl(value)
            m_Fill = New SolidColorBrush(Color.FromRgb(CByte(m_Red), CByte(m_Green), CByte(m_Blue)))
            SetCurrColorFill(m_Fill.Color)
            NotifyPropertyChanged(NameOf(Fill))
         Else
            NotifyPropertyChanged(NameOf(Blue))
         End If
      End Set
   End Property

   Friend Sub SetBlu(value As Double)
      m_Blue = value
      NotifyPropertyChanged(NameOf(Blue))
   End Sub

   ' Definizione comandi
   Private m_cmdCancel As ICommand
   Private m_cmdOk As ICommand
   Private m_cmdSaveColor As ICommand

#Region "Messages"

   Public ReadOnly Property Red_Msg As String
      Get
         Return EgtMsg(15050)    ' Rosso (0 - 255)
      End Get
   End Property

   Public ReadOnly Property Green_Msg As String
      Get
         Return EgtMsg(15051)    ' Verde (0 - 255)
      End Get
   End Property

   Public ReadOnly Property Blu_Msg As String
      Get
         Return EgtMsg(15052)    ' Blu (0 - 255)
      End Get
   End Property

   Public ReadOnly Property Hexadecimal_Msg As String
      Get
         Return EgtMsg(15053)    ' Esadecimale
      End Get
   End Property
   Public ReadOnly Property AddCColor_Msg As String
      Get
         Return EgtMsg(15054)    ' Agg Colore Personalizzato
      End Get
   End Property

   Public ReadOnly Property BasicColor_Msg As String
      Get
         Return EgtMsg(15055)    ' Colori Base
      End Get
   End Property

   Public ReadOnly Property CustomColor_Msg As String
      Get
         Return EgtMsg(15056)    ' Colori Personalizzati
      End Get
   End Property

   Public ReadOnly Property ColorPicker_Msg As String
      Get
         Return EgtMsg(15057)    ' Honey Comb
      End Get
   End Property

   Public ReadOnly Property ColorPickerTheme_Msg As String
      Get
         Return EgtMsg(15058)    ' Tema Colori
      End Get
   End Property

#End Region    ' Messages

#End Region    ' Fields & Proprierties

#Region "CONTRUCTORS"

   Sub New()
      EgtColorPicker.SetOwner(Me)

      'Colori di Base
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#F08080"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#F0E68C"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#90EE90"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#98FB98"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#00FFFF"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#4682b4"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFC0CB"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF69B4"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF0000"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFF00"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#32CD32"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#65FE08"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#00FFFF"), Color))))

      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#6495ED"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#9370DB"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF00FF"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#964B00"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFA500"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#008000"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#3CB371"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#0000CD"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#7B68EE"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#C71585"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF1493"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#8B0000"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF8C00"), Color))))

      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#6B8E23"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#556B2F"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#0000FF"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#000080"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#8B008B"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#8A2BE2"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#800000"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#B22222"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#228B22"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#006400"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#00008B"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#191970"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#483D8B"), Color))))

      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#4B0082"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#000000"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#BDB76B"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#808000"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#A9A9A9"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#66DDAA"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#808080"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#9400D3"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFFF"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#003366"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#336699"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#3366CC"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#003399"), Color))))

      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#000099"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#0000CC"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#000066"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#006666"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#006699"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#0099CC"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#0066CC"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#0033CC"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#3333FF"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#333399"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#669999"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#009999"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#33CCCC"), Color))))

      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#00CCFF"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#0099FF"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#0066FF"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#3366FF"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#3333CC"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#666699"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#339966"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#00CC99"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#00FFCC"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#33CCFF"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#3399FF"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#6699FF"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#6666FF"), Color))))

      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#6600FF"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#6600CC"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#339933"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#00CC66"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#00FF99"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#66FFCC"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#66FFFF"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#66CCFF"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#99CCFF"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#9999FF"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#9966FF"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#9933FF"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#9900FF"), Color))))

      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#006600"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#00CC00"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#00FF00"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#66FF99"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#99FFCC"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#CCFFFF"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#CCCCFF"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#CC99FF"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#CC66FF"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#CC33FF"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#CC00FF"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#9900CC"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#003300"), Color))))

      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#009933"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#33CC33"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#66FF66"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#99FF99"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#CCFFCC"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFCCFF"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF99FF"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF66FF"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#CC00CC"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#660066"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#336600"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#009900"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#66FF33"), Color))))

      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#99FF66"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#CCFF99"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFCC"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFCCCC"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF99CC"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF66CC"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF33CC"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#CC0099"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#993399"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#333300"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#669900"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#99FF33"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#CCFF66"), Color))))

      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFF99"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFCC99"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF9999"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF6699"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF3399"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#CC3399"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#990099"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#666633"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#99CC00"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#CCFF33"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFF66"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFCC66"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF9966"), Color))))

      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF6666"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF0066"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#CC6699"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#993366"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#999966"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#CCCC00"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFCC00"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF9933"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF6600"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF5050"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#CC0066"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#660033"), Color))))
      m_BasicColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#996633"), Color))))

      'Colori Personalizzati 
      m_CustomColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFFF"), Color))))
      m_CustomColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFFF"), Color))))
      m_CustomColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFFF"), Color))))
      m_CustomColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFFF"), Color))))
      m_CustomColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFFF"), Color))))
      m_CustomColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFFF"), Color))))
      m_CustomColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFFF"), Color))))
      m_CustomColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFFF"), Color))))
      m_CustomColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFFF"), Color))))
      m_CustomColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFFF"), Color))))
      m_CustomColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFFF"), Color))))
      m_CustomColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFFF"), Color))))
      m_CustomColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFFF"), Color))))

      m_CustomColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFFF"), Color))))
      m_CustomColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFFF"), Color))))
      m_CustomColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFFF"), Color))))
      m_CustomColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFFF"), Color))))
      m_CustomColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFFF"), Color))))
      m_CustomColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFFF"), Color))))
      m_CustomColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFFF"), Color))))
      m_CustomColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFFF"), Color))))
      m_CustomColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFFF"), Color))))
      m_CustomColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFFF"), Color))))
      m_CustomColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFFF"), Color))))
      m_CustomColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFFF"), Color))))
      m_CustomColors.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFFF"), Color))))

      ' Lista Colori Esagono
      m_HexList.Add(New HexItem(0, 3, CType(New BrushConverter().ConvertFrom("#003366"), SolidColorBrush)))
      m_HexList.Add(New HexItem(0, 4, CType(New BrushConverter().ConvertFrom("#336699"), SolidColorBrush)))
      m_HexList.Add(New HexItem(0, 5, CType(New BrushConverter().ConvertFrom("#3366CC"), SolidColorBrush)))
      m_HexList.Add(New HexItem(0, 6, CType(New BrushConverter().ConvertFrom("#003399"), SolidColorBrush)))
      m_HexList.Add(New HexItem(0, 7, CType(New BrushConverter().ConvertFrom("#000099"), SolidColorBrush)))
      m_HexList.Add(New HexItem(0, 8, CType(New BrushConverter().ConvertFrom("#0000CC"), SolidColorBrush)))
      m_HexList.Add(New HexItem(0, 9, CType(New BrushConverter().ConvertFrom("#000066"), SolidColorBrush)))

      m_HexList.Add(New HexItem(1, 2, CType(New BrushConverter().ConvertFrom("#006666"), SolidColorBrush)))
      m_HexList.Add(New HexItem(1, 3, CType(New BrushConverter().ConvertFrom("#006699"), SolidColorBrush)))
      m_HexList.Add(New HexItem(1, 4, CType(New BrushConverter().ConvertFrom("#0099CC"), SolidColorBrush)))
      m_HexList.Add(New HexItem(1, 5, CType(New BrushConverter().ConvertFrom("#0066CC"), SolidColorBrush)))
      m_HexList.Add(New HexItem(1, 6, CType(New BrushConverter().ConvertFrom("#0033CC"), SolidColorBrush)))
      m_HexList.Add(New HexItem(1, 7, CType(New BrushConverter().ConvertFrom("#0000FF"), SolidColorBrush)))
      m_HexList.Add(New HexItem(1, 8, CType(New BrushConverter().ConvertFrom("#3333FF"), SolidColorBrush)))
      m_HexList.Add(New HexItem(1, 9, CType(New BrushConverter().ConvertFrom("#333399"), SolidColorBrush)))

      m_HexList.Add(New HexItem(2, 2, CType(New BrushConverter().ConvertFrom("#669999"), SolidColorBrush)))
      m_HexList.Add(New HexItem(2, 3, CType(New BrushConverter().ConvertFrom("#009999"), SolidColorBrush)))
      m_HexList.Add(New HexItem(2, 4, CType(New BrushConverter().ConvertFrom("#33CCCC"), SolidColorBrush)))
      m_HexList.Add(New HexItem(2, 5, CType(New BrushConverter().ConvertFrom("#00CCFF"), SolidColorBrush)))
      m_HexList.Add(New HexItem(2, 6, CType(New BrushConverter().ConvertFrom("#0099FF"), SolidColorBrush)))
      m_HexList.Add(New HexItem(2, 7, CType(New BrushConverter().ConvertFrom("#0066FF"), SolidColorBrush)))
      m_HexList.Add(New HexItem(2, 8, CType(New BrushConverter().ConvertFrom("#3366FF"), SolidColorBrush)))
      m_HexList.Add(New HexItem(2, 9, CType(New BrushConverter().ConvertFrom("#3333CC"), SolidColorBrush)))
      m_HexList.Add(New HexItem(2, 10, CType(New BrushConverter().ConvertFrom("#666699"), SolidColorBrush)))

      m_HexList.Add(New HexItem(3, 1, CType(New BrushConverter().ConvertFrom("#339966"), SolidColorBrush)))
      m_HexList.Add(New HexItem(3, 2, CType(New BrushConverter().ConvertFrom("#00CC99"), SolidColorBrush)))
      m_HexList.Add(New HexItem(3, 3, CType(New BrushConverter().ConvertFrom("#00FFCC"), SolidColorBrush)))
      m_HexList.Add(New HexItem(3, 4, CType(New BrushConverter().ConvertFrom("#00FFFF"), SolidColorBrush)))
      m_HexList.Add(New HexItem(3, 5, CType(New BrushConverter().ConvertFrom("#33CCFF"), SolidColorBrush)))
      m_HexList.Add(New HexItem(3, 6, CType(New BrushConverter().ConvertFrom("#3399FF"), SolidColorBrush)))
      m_HexList.Add(New HexItem(3, 7, CType(New BrushConverter().ConvertFrom("#6699FF"), SolidColorBrush)))
      m_HexList.Add(New HexItem(3, 8, CType(New BrushConverter().ConvertFrom("#6666FF"), SolidColorBrush)))
      m_HexList.Add(New HexItem(3, 9, CType(New BrushConverter().ConvertFrom("#6600FF"), SolidColorBrush)))
      m_HexList.Add(New HexItem(3, 10, CType(New BrushConverter().ConvertFrom("#6600CC"), SolidColorBrush)))

      m_HexList.Add(New HexItem(4, 1, CType(New BrushConverter().ConvertFrom("#339933"), SolidColorBrush)))
      m_HexList.Add(New HexItem(4, 2, CType(New BrushConverter().ConvertFrom("#00CC66"), SolidColorBrush)))
      m_HexList.Add(New HexItem(4, 3, CType(New BrushConverter().ConvertFrom("#00FF99"), SolidColorBrush)))
      m_HexList.Add(New HexItem(4, 4, CType(New BrushConverter().ConvertFrom("#66FFCC"), SolidColorBrush)))
      m_HexList.Add(New HexItem(4, 5, CType(New BrushConverter().ConvertFrom("#66FFFF"), SolidColorBrush)))
      m_HexList.Add(New HexItem(4, 6, CType(New BrushConverter().ConvertFrom("#66CCFF"), SolidColorBrush)))
      m_HexList.Add(New HexItem(4, 7, CType(New BrushConverter().ConvertFrom("#99CCFF"), SolidColorBrush)))
      m_HexList.Add(New HexItem(4, 8, CType(New BrushConverter().ConvertFrom("#9999FF"), SolidColorBrush)))
      m_HexList.Add(New HexItem(4, 9, CType(New BrushConverter().ConvertFrom("#9966FF"), SolidColorBrush)))
      m_HexList.Add(New HexItem(4, 10, CType(New BrushConverter().ConvertFrom("#9933FF"), SolidColorBrush)))
      m_HexList.Add(New HexItem(4, 11, CType(New BrushConverter().ConvertFrom("#9900FF"), SolidColorBrush)))

      m_HexList.Add(New HexItem(5, 0, CType(New BrushConverter().ConvertFrom("#006600"), SolidColorBrush)))
      m_HexList.Add(New HexItem(5, 1, CType(New BrushConverter().ConvertFrom("#00CC00"), SolidColorBrush)))
      m_HexList.Add(New HexItem(5, 2, CType(New BrushConverter().ConvertFrom("#00FF00"), SolidColorBrush)))
      m_HexList.Add(New HexItem(5, 3, CType(New BrushConverter().ConvertFrom("#66FF99"), SolidColorBrush)))
      m_HexList.Add(New HexItem(5, 4, CType(New BrushConverter().ConvertFrom("#99FFCC"), SolidColorBrush)))
      m_HexList.Add(New HexItem(5, 5, CType(New BrushConverter().ConvertFrom("#CCFFFF"), SolidColorBrush)))
      m_HexList.Add(New HexItem(5, 6, CType(New BrushConverter().ConvertFrom("#CCCCFF"), SolidColorBrush)))
      m_HexList.Add(New HexItem(5, 7, CType(New BrushConverter().ConvertFrom("#CC99FF"), SolidColorBrush)))
      m_HexList.Add(New HexItem(5, 8, CType(New BrushConverter().ConvertFrom("#CC66FF"), SolidColorBrush)))
      m_HexList.Add(New HexItem(5, 9, CType(New BrushConverter().ConvertFrom("#CC33FF"), SolidColorBrush)))
      m_HexList.Add(New HexItem(5, 10, CType(New BrushConverter().ConvertFrom("#CC00FF"), SolidColorBrush)))
      m_HexList.Add(New HexItem(5, 11, CType(New BrushConverter().ConvertFrom("#9900CC"), SolidColorBrush)))

      m_HexList.Add(New HexItem(6, 0, CType(New BrushConverter().ConvertFrom("#003300"), SolidColorBrush)))
      m_HexList.Add(New HexItem(6, 1, CType(New BrushConverter().ConvertFrom("#009933"), SolidColorBrush)))
      m_HexList.Add(New HexItem(6, 2, CType(New BrushConverter().ConvertFrom("#33CC33"), SolidColorBrush)))
      m_HexList.Add(New HexItem(6, 3, CType(New BrushConverter().ConvertFrom("#66FF66"), SolidColorBrush)))
      m_HexList.Add(New HexItem(6, 4, CType(New BrushConverter().ConvertFrom("#99FF99"), SolidColorBrush)))
      m_HexList.Add(New HexItem(6, 5, CType(New BrushConverter().ConvertFrom("#CCFFCC"), SolidColorBrush)))
      m_HexList.Add(New HexItem(6, 6, CType(New BrushConverter().ConvertFrom("#FFFFFF"), SolidColorBrush)))
      m_HexList.Add(New HexItem(6, 7, CType(New BrushConverter().ConvertFrom("#FFCCFF"), SolidColorBrush)))
      m_HexList.Add(New HexItem(6, 8, CType(New BrushConverter().ConvertFrom("#FF99FF"), SolidColorBrush)))
      m_HexList.Add(New HexItem(6, 9, CType(New BrushConverter().ConvertFrom("#FF66FF"), SolidColorBrush)))
      m_HexList.Add(New HexItem(6, 10, CType(New BrushConverter().ConvertFrom("#FF00FF"), SolidColorBrush)))
      m_HexList.Add(New HexItem(6, 11, CType(New BrushConverter().ConvertFrom("#CC00CC"), SolidColorBrush)))
      m_HexList.Add(New HexItem(6, 12, CType(New BrushConverter().ConvertFrom("#660066"), SolidColorBrush)))

      m_HexList.Add(New HexItem(7, 0, CType(New BrushConverter().ConvertFrom("#336600"), SolidColorBrush)))
      m_HexList.Add(New HexItem(7, 1, CType(New BrushConverter().ConvertFrom("#009900"), SolidColorBrush)))
      m_HexList.Add(New HexItem(7, 2, CType(New BrushConverter().ConvertFrom("#66FF33"), SolidColorBrush)))
      m_HexList.Add(New HexItem(7, 3, CType(New BrushConverter().ConvertFrom("#99FF66"), SolidColorBrush)))
      m_HexList.Add(New HexItem(7, 4, CType(New BrushConverter().ConvertFrom("#CCFF99"), SolidColorBrush)))
      m_HexList.Add(New HexItem(7, 5, CType(New BrushConverter().ConvertFrom("#FFFFCC"), SolidColorBrush)))
      m_HexList.Add(New HexItem(7, 6, CType(New BrushConverter().ConvertFrom("#FFCCCC"), SolidColorBrush)))
      m_HexList.Add(New HexItem(7, 7, CType(New BrushConverter().ConvertFrom("#FF99CC"), SolidColorBrush)))
      m_HexList.Add(New HexItem(7, 8, CType(New BrushConverter().ConvertFrom("#FF66CC"), SolidColorBrush)))
      m_HexList.Add(New HexItem(7, 9, CType(New BrushConverter().ConvertFrom("#FF33CC"), SolidColorBrush)))
      m_HexList.Add(New HexItem(7, 10, CType(New BrushConverter().ConvertFrom("#CC0099"), SolidColorBrush)))
      m_HexList.Add(New HexItem(7, 11, CType(New BrushConverter().ConvertFrom("#993399"), SolidColorBrush)))

      m_HexList.Add(New HexItem(8, 1, CType(New BrushConverter().ConvertFrom("#333300"), SolidColorBrush)))
      m_HexList.Add(New HexItem(8, 2, CType(New BrushConverter().ConvertFrom("#669900"), SolidColorBrush)))
      m_HexList.Add(New HexItem(8, 3, CType(New BrushConverter().ConvertFrom("#99FF33"), SolidColorBrush)))
      m_HexList.Add(New HexItem(8, 4, CType(New BrushConverter().ConvertFrom("#CCFF66"), SolidColorBrush)))
      m_HexList.Add(New HexItem(8, 5, CType(New BrushConverter().ConvertFrom("#FFFF99"), SolidColorBrush)))
      m_HexList.Add(New HexItem(8, 6, CType(New BrushConverter().ConvertFrom("#FFCC99"), SolidColorBrush)))
      m_HexList.Add(New HexItem(8, 7, CType(New BrushConverter().ConvertFrom("#FF9999"), SolidColorBrush)))
      m_HexList.Add(New HexItem(8, 8, CType(New BrushConverter().ConvertFrom("#FF6699"), SolidColorBrush)))
      m_HexList.Add(New HexItem(8, 9, CType(New BrushConverter().ConvertFrom("#FF3399"), SolidColorBrush)))
      m_HexList.Add(New HexItem(8, 10, CType(New BrushConverter().ConvertFrom("#CC3399"), SolidColorBrush)))
      m_HexList.Add(New HexItem(8, 11, CType(New BrushConverter().ConvertFrom("#990099"), SolidColorBrush)))

      m_HexList.Add(New HexItem(9, 1, CType(New BrushConverter().ConvertFrom("#666633"), SolidColorBrush)))
      m_HexList.Add(New HexItem(9, 2, CType(New BrushConverter().ConvertFrom("#99CC00"), SolidColorBrush)))
      m_HexList.Add(New HexItem(9, 3, CType(New BrushConverter().ConvertFrom("#CCFF33"), SolidColorBrush)))
      m_HexList.Add(New HexItem(9, 4, CType(New BrushConverter().ConvertFrom("#FFFF66"), SolidColorBrush)))
      m_HexList.Add(New HexItem(9, 5, CType(New BrushConverter().ConvertFrom("#FFCC66"), SolidColorBrush)))
      m_HexList.Add(New HexItem(9, 6, CType(New BrushConverter().ConvertFrom("#FF9966"), SolidColorBrush)))
      m_HexList.Add(New HexItem(9, 7, CType(New BrushConverter().ConvertFrom("#FF6666"), SolidColorBrush)))
      m_HexList.Add(New HexItem(9, 8, CType(New BrushConverter().ConvertFrom("#FF0066"), SolidColorBrush)))
      m_HexList.Add(New HexItem(9, 9, CType(New BrushConverter().ConvertFrom("#CC6699"), SolidColorBrush)))
      m_HexList.Add(New HexItem(9, 10, CType(New BrushConverter().ConvertFrom("#993366"), SolidColorBrush)))

      m_HexList.Add(New HexItem(10, 2, CType(New BrushConverter().ConvertFrom("#999966"), SolidColorBrush)))
      m_HexList.Add(New HexItem(10, 3, CType(New BrushConverter().ConvertFrom("#CCCC00"), SolidColorBrush)))
      m_HexList.Add(New HexItem(10, 4, CType(New BrushConverter().ConvertFrom("#FFFF00"), SolidColorBrush)))
      m_HexList.Add(New HexItem(10, 5, CType(New BrushConverter().ConvertFrom("#FFCC00"), SolidColorBrush)))
      m_HexList.Add(New HexItem(10, 6, CType(New BrushConverter().ConvertFrom("#FF9933"), SolidColorBrush)))
      m_HexList.Add(New HexItem(10, 7, CType(New BrushConverter().ConvertFrom("#FF6600"), SolidColorBrush)))
      m_HexList.Add(New HexItem(10, 8, CType(New BrushConverter().ConvertFrom("#FF5050"), SolidColorBrush)))
      m_HexList.Add(New HexItem(10, 9, CType(New BrushConverter().ConvertFrom("#CC0066"), SolidColorBrush)))
      m_HexList.Add(New HexItem(10, 10, CType(New BrushConverter().ConvertFrom("#660033"), SolidColorBrush)))

      m_HexList.Add(New HexItem(11, 2, CType(New BrushConverter().ConvertFrom("#996633"), SolidColorBrush)))
      m_HexList.Add(New HexItem(11, 3, CType(New BrushConverter().ConvertFrom("#CC9900"), SolidColorBrush)))
      m_HexList.Add(New HexItem(11, 4, CType(New BrushConverter().ConvertFrom("#FF9900"), SolidColorBrush)))
      m_HexList.Add(New HexItem(11, 5, CType(New BrushConverter().ConvertFrom("#CC6600"), SolidColorBrush)))
      m_HexList.Add(New HexItem(11, 6, CType(New BrushConverter().ConvertFrom("#FF3300"), SolidColorBrush)))
      m_HexList.Add(New HexItem(11, 7, CType(New BrushConverter().ConvertFrom("#FF0000"), SolidColorBrush)))
      m_HexList.Add(New HexItem(11, 8, CType(New BrushConverter().ConvertFrom("#CC0000"), SolidColorBrush)))
      m_HexList.Add(New HexItem(11, 9, CType(New BrushConverter().ConvertFrom("#990033"), SolidColorBrush)))

      m_HexList.Add(New HexItem(12, 3, CType(New BrushConverter().ConvertFrom("#663300"), SolidColorBrush)))
      m_HexList.Add(New HexItem(12, 4, CType(New BrushConverter().ConvertFrom("#996600"), SolidColorBrush)))
      m_HexList.Add(New HexItem(12, 5, CType(New BrushConverter().ConvertFrom("#CC3300"), SolidColorBrush)))
      m_HexList.Add(New HexItem(12, 6, CType(New BrushConverter().ConvertFrom("#993300"), SolidColorBrush)))
      m_HexList.Add(New HexItem(12, 7, CType(New BrushConverter().ConvertFrom("#990000"), SolidColorBrush)))
      m_HexList.Add(New HexItem(12, 8, CType(New BrushConverter().ConvertFrom("#800000"), SolidColorBrush)))
      m_HexList.Add(New HexItem(12, 9, CType(New BrushConverter().ConvertFrom("#993333"), SolidColorBrush)))

      'Color Theme
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFFF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#000000"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#999966"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#333399"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#0066FF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#CC0000"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#99CC00"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#9933FF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#0099CC"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF9933"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFF00"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF0000"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#66FF33"), Color))))

      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#F2F2F2"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#8C8C8C"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#F5F5F0"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#ECECF9"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#E6F0FF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFE6E6"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#F9FFE6"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#F2E6FF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#E6F9FF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFF2E6"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFE6"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFE6E6"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#ECFFE6"), Color))))

      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#E6E6E6"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#808080"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#EBEBE0"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#D9D9F2"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#CCE0FF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFCCCC"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#F2FFCC"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#E6CCFF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#CCF2FF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFE6CC"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFCC"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFCCCC"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#D9FFCC"), Color))))

      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#D9D9D9"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#737373"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#E0E0D1"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#C6C6EC"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#B3D1FF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFB3B3"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#ECFFB3"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#D9B3FF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#B3ECFF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFD9B3"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFFB3"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFB3B3"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#C6FFB3"), Color))))

      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#CCCCCC"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#666666"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#D6D6C2"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#B3B3E6"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#99C2FF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF9999"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#E6FF99"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#CC99FF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#99E6FF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFCC99"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFF99"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF9999"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#B3FF99"), Color))))

      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#BFBFBF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#595959"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#CCCCB3"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#9F9FDF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#80B3FF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF8080"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#DFFF80"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#BF80FF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#80DFFF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFBF80"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFF80"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF8080"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#9FFF80"), Color))))

      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#B3B3B3"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#4D4D4D"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#C2C2A3"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#8C8CD9"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#80B3FF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF6666"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#D9FF66"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#B366FF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#66D9FF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFB366"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFF66"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF6666"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#8CFF66"), Color))))

      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#A6A6A6"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#404040"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#B8B894"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#7979D2"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#66A3FF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF4D4D"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#D2FF4D"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#A64DFF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#4DD2FF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFA64D"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFF4D"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF4D4D"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#79FF4D"), Color))))

      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#999999"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#333333"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#ADAD85"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#6666CC"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#4D94FF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF3333"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#CCFF33"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#8C1AFF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#33CCFF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF8C1A"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFF33"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF3333"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#53FF1A"), Color))))

      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#8C8C8C"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#262626"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#A3A375"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#5353C6"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#3385FF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF1A1A"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#C6FF1A"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#8000FF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#1AC6FF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF8000"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FFFF1A"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF1A1A"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#40FF00"), Color))))

      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#808080"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#1A1A1A"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#999966"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#4040BF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#1A75FF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#FF0000"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#BFFF00"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#7300E6"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#00BFFF"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#E67300"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#E6E600"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#E60000"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#39E600"), Color))))

      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#737373"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#0D0D0D"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#8A8A5C"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#3939AC"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#005CE6"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#E60000"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#ACE600"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#6600CC"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#00ACE6"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#CC6600"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#CCCC00"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#CC0000"), Color))))
      m_BasicColorsTheme.Add(New EgtColorPicker(New SolidColorBrush(CType(ColorConverter.ConvertFromString("#33CC00"), Color))))

      NotifyPropertyChanged(NameOf(HexList))
      NotifyPropertyChanged(NameOf(BasicColors))
      NotifyPropertyChanged(NameOf(CustomColors))
      NotifyPropertyChanged(NameOf(BasicColorsTheme))

      SelCustomColor = m_CustomColors(0)
      NotifyPropertyChanged(NameOf(SelCustomColor))
   End Sub

#End Region    'Constructors

#Region "METHODS"

   Friend Sub UpdateColor(value As Double)
      NotifyPropertyChanged(NameOf(CurrColor))
      NotifyPropertyChanged(NameOf(Red))
      NotifyPropertyChanged(NameOf(Green))
      NotifyPropertyChanged(NameOf(Blue))
      NotifyPropertyChanged(NameOf(Hexadecimal))
   End Sub

   Private Sub UpdateChangeColor()
      NotifyPropertyChanged(NameOf(CurrColor))
      NotifyPropertyChanged(NameOf(Red))
      NotifyPropertyChanged(NameOf(Green))
      NotifyPropertyChanged(NameOf(Blue))
      NotifyPropertyChanged(NameOf(Hexadecimal))
   End Sub

#End Region    ' Methods

#Region "COMMANDS"

   Public ReadOnly Property Ok_Command As ICommand
      Get
         If m_cmdOk Is Nothing Then
            m_cmdOk = New Command(AddressOf Ok)
         End If
         Return m_cmdOk
      End Get
   End Property

   Public Sub Ok()
      RaiseEvent m_CloseWindow(CType(DialogResult.OK, MessageBoxResult))
   End Sub

   Public ReadOnly Property Cancel_Command As ICommand
      Get
         If m_cmdCancel Is Nothing Then
            m_cmdCancel = New Command(AddressOf Cancel)
         End If
         Return m_cmdCancel
      End Get
   End Property

   Public Sub Cancel()
      RaiseEvent m_CloseWindow(CType(DialogResult.Cancel, MessageBoxResult))
   End Sub

   Public ReadOnly Property SaveColor_Command As ICommand
      Get
         If m_cmdSaveColor Is Nothing Then
            m_cmdSaveColor = New Command(AddressOf SaveColor)
         End If
         Return m_cmdSaveColor
      End Get
   End Property

   Public Sub SaveColor()
      If Not IsNothing(m_CustomColor) Then
         m_CustomColor.SetFill(CurrColor)
         Dim nIndex As Integer = m_CustomColors.IndexOf(SelCustomColor)
         m_CustomColor = If(nIndex >= 0 AndAlso nIndex < m_CustomColors.Count - 1, m_CustomColors(nIndex + 1), m_CustomColors(0))
         NotifyPropertyChanged(NameOf(SelCustomColor))
      End If
   End Sub

#End Region    'Commands

End Class

Public Class EgtColorPicker
   Inherits VMBase

#Region "FIELDS & PROPERTIES"

   Private Shared Owner As EgtColorPickerVM

   Private m_Fill As SolidColorBrush
   Public ReadOnly Property Fill As SolidColorBrush
      Get
         Return m_Fill
      End Get
   End Property

   Friend Sub SetFill(value As SolidColorBrush)
      m_Fill = value
      NotifyPropertyChanged(NameOf(Fill))
   End Sub

   Private m_CurrColorFill As SolidColorBrush
   Public ReadOnly Property CurrColor_Fill As SolidColorBrush
      Get
         Return m_CurrColorFill
      End Get
   End Property

   Friend Sub SetCurrFill(value As SolidColorBrush)
      m_CurrColorFill = value
      NotifyPropertyChanged(NameOf(CurrColor_Fill))
   End Sub

#End Region    ' Fields & Properties

#Region "CONTRUCTORS"

   Sub New(Fill As SolidColorBrush)
      m_Fill = Fill
   End Sub

#End Region    'Constructors

#Region "METHODS"

   Friend Shared Sub SetOwner(value As EgtColorPickerVM)
      Owner = value
   End Sub

#End Region    ' Methods

End Class

Public Class HexItem
   Inherits VMBase

#Region "FIELDS & PROPERTIES"

   Private m_nRow As Integer
   Public Property nRow As Integer
      Get
         Return m_nRow
      End Get
      Set(value As Integer)
         m_nRow = value
         NotifyPropertyChanged(NameOf(nRow))
      End Set
   End Property

   Private m_nColumn As Integer
   Public Property nColumn As Integer
      Get
         Return m_nColumn
      End Get
      Set(value As Integer)
         m_nColumn = value
         NotifyPropertyChanged(NameOf(nColumn))
      End Set
   End Property

   Private m_Background As SolidColorBrush
   Public Property Background As SolidColorBrush
      Get
         Return m_Background
      End Get
      Set(value As SolidColorBrush)
         m_Background = value
         NotifyPropertyChanged(NameOf(Background))
      End Set
   End Property

#End Region    ' Fields & Properties

#Region "CONTRUCTORS"

   Sub New(nRow As Integer, nColumn As Integer, Background As SolidColorBrush)
      m_nRow = nRow
      m_nColumn = nColumn
      m_Background = Background
   End Sub

#End Region    ' Constructors

End Class