anchor.diff:  var
     WType: TChartArmyType;
   begin
  -  Panel_ChartsArmy := TKMPanel.Create(aParent, 62, PANES_TOP, 900, 435);
  +  Panel_ChartsArmy := TKMPanel.Create(aParent, 62, PANES_TOP, 900, CHART_HEIGHT);
     Panel_ChartsArmy.AnchorsCenter;
   
  -    Columnbox_Army := TKMColumnBox.Create(Panel_ChartsArmy, 0, 0, 140, 435, fnt_Game, bsMenu);
  +    Columnbox_Army := TKMColumnBox.Create(Panel_ChartsArmy, 0, 0, 140, CHART_HEIGHT, fnt_Game, bsMenu);
       Columnbox_Army.SetColumns(fnt_Game, ['', ''], [0, 30]);
       Columnbox_Army.ShowHeader := False;
       Columnbox_Army.ShowLines := False;
  
positive.code: 
      Label_NoArmyData := TKMLabel.Create(Panel_ChartsArmy, 450, 215, gResTexts[TX_GRAPH_NO_DATA], fnt_Metal, taCenter);
  
      Panel_ChartArmy_Type := TKMPanel.Create(Panel_ChartsArmy, 755, 335, 150, 80);
      with TKMShape.Create(Panel_ChartArmy_Type, 0, 0, 150, 80) do
      begin
        FillColor := $80303030;
  
negative.code: var
    I: TWareType;
  begin
    Panel_ChartsWares := TKMPanel.Create(aParent, 62, PANES_TOP, 900, CHART_HEIGHT);
    Panel_ChartsWares.AnchorsCenter;
  
      Columnbox_Wares := TKMColumnBox.Create(Panel_ChartsWares, 0, 0, 140, CHART_HEIGHT, fnt_Game, bsMenu);
      Columnbox_Wares.SetColumns(fnt_Game, ['', ''], [0, 20]);
      Columnbox_Wares.ShowHeader := False;
      Columnbox_Wares.ShowLines := False;
  