anchor.diff:    Shape_TextColor.FillColor := FlagColorToTextColor(Shape_Color.FillColor);
   
     ColorText := GetColorCodeText(gMySpectator.Hand.FlagColor, True);
  -  if not AnsiEndsText(Edit_ColorCode.Text, ColorText) then
  +  if aUpdateColorEdit or not AnsiEndsText(Edit_ColorCode.Text, ColorText) then
       Edit_ColorCode.UpdateText(ColorText);
   
     Edit_TextColorCode.UpdateText(GetColorCodeText(Shape_TextColor.FillColor, True));
  
positive.code: 
  procedure TKMMapEdPlayerColors.Show;
  begin
    UpdatePlayer;
    Panel_Color.Show;
  end;
  
  
negative.code:   public
      constructor Create(aParent: TKMPanel);
  
      procedure UpdatePlayer(aUpdateColorEdit: Boolean = False);
      procedure Show;
      function Visible: Boolean;
      procedure Hide;
  