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