anchor.diff:  
   FreeAndNil(Mobs);
   
  +
   end.
  
positive.code:   I: Integer;
  begin
    for I := 0 to Count - 1 do
    begin
      FMob[I].Free;
      FMob[I] := nil;
    end;
    inherited;
  end;
  
  
negative.code: 
  function TMobs.GetName(I: TMobEnum): string;
  begin
    Result := MobName[I];
  end;
  
  initialization
  