anchor.diff:  begin
     if (fPrevHint = Sender) then exit; //Hint didn't changed
   
  -  if Sender=nil then Label_Hint.Caption:=''
  -                else Label_Hint.Caption:=TKMControl(Sender).Hint;
  +  if (Sender=nil) or (TKMControl(Sender).Hint = '') then
  +  begin
  +    Label_Hint.Caption := '';
  +    Bevel_HintBG.Hide;
  +  end
  +  else
  +  begin
  +    Label_Hint.Caption := TKMControl(Sender).Hint;
  +    Bevel_HintBG.Show;
  +    Bevel_HintBG.Width := 8+fResource.ResourceFont.GetTextSize(Label_Hint.Caption, Label_Hint.Font).X;
  +  end;
   
     fPrevHint := Sender;
   end;
  
positive.code:       Button_PlayerSelect[I].OnClick := Player_ChangeActive;
      end;
  
      Label_Hint := TKMLabel.Create(Panel_Main, 224 + 38, Panel_Main.Height - 16, 0, 0, '', fnt_Outline, taLeft);
      Label_Hint.Anchors := [akLeft, akBottom];
  
    Panel_Common := TKMPanel.Create(Panel_Main,0,255,224,768);
  
negative.code:       Label_Passability:TKMLabel;
        Button_PlayerSelect:array[0..MAX_PLAYERS-1]of TKMFlatButtonShape; //Animals are common for all
        Label_Stat,Label_Hint:TKMLabel;
        Bevel_HintBG: TKMBevel;
        Label_MatAmount: TKMLabel;
        Shape_MatAmount: TKMShape;
        Label_DefenceID: TKMLabel;
  