anchor.diff:      function GetTag(AIndex: Integer): Integer; override;
       function GetValue(AHandIndex: Integer; ATag: Integer): String; override;
     end;
  +       
  +  TKMGUIGameSpectatorItemLineArmyKilling = class(TKMGUIGameSpectatorItemLineArmy)
  +  protected
  +    function GetValue(AHandIndex: Integer; ATag: Integer): String; override;
  +  end;     
  +       
  +  TKMGUIGameSpectatorItemLineArmyLost = class(TKMGUIGameSpectatorItemLineArmy)
  +  protected
  +    function GetValue(AHandIndex: Integer; ATag: Integer): String; override;
  +  end;  
   
     ///
   
  
positive.code:   AddLineType(2, TKMGUIGameSpectatorItemLineBuildings);
    AddLineType(3, nil);
    AddLineType(4, TKMGUIGameSpectatorItemLineArmy);
    AddLineType(5, nil);
    AddLineType(6, nil);
                   
    FDropBox := TKMDropList.Create(FDropBoxPanel, 5, 5, 200, 20, fnt_Metal, '', bsGame);
    FDropBox.OnChange := ChangePage;
  
negative.code:   Result := IntToStr(gHands[AHandIndex].Stats.GetUnitQty(TUnitType(ATag)));
  end;
  
  { TKMGUIGameSpectatorItemLineArmyKilling }
  
  function TKMGUIGameSpectatorItemLineArmyKilling.GetValue(AHandIndex: Integer; ATag: Integer): String;
  begin
    Result := IntToStr(gHands[AHandIndex].Stats.GetUnitKilledQty(TUnitType(ATag)));
  end;        
      
  { TKMGUIGameSpectatorItemLineArmyLost }
  
  function TKMGUIGameSpectatorItemLineArmyLost.GetValue(AHandIndex: Integer; ATag: Integer): String;
  begin
    Result := IntToStr(gHands[AHandIndex].Stats.GetUnitLostQty(TUnitType(ATag)));
  end;     
  
  { TKMGUIGameSpectator }
  
  constructor TKMGUIGameSpectator.Create(aParent: TKMPanel);
  