716 for h:= 0 to cMaxHHIndex do |
716 for h:= 0 to cMaxHHIndex do |
717 with TeamsArray[i]^.Hedgehogs[h] do |
717 with TeamsArray[i]^.Hedgehogs[h] do |
718 begin |
718 begin |
719 if GearHidden <> nil then |
719 if GearHidden <> nil then |
720 Dispose(GearHidden); |
720 Dispose(GearHidden); |
721 |
721 |
722 FreeTexture(NameTagTex); |
722 FreeTexture(NameTagTex); |
723 FreeTexture(HealthTagTex); |
723 FreeTexture(HealthTagTex); |
724 FreeTexture(HatTex); |
724 FreeTexture(HatTex); |
725 end; |
725 end; |
726 |
726 |
727 with TeamsArray[i]^ do |
727 with TeamsArray[i]^ do |
728 begin |
728 begin |
729 FreeTexture(NameTagTex); |
729 FreeTexture(NameTagTex); |
730 FreeTexture(CrosshairTex); |
|
731 FreeTexture(GraveTex); |
730 FreeTexture(GraveTex); |
732 FreeTexture(HealthTex); |
731 FreeTexture(HealthTex); |
733 FreeTexture(AIKillsTex); |
732 FreeTexture(AIKillsTex); |
734 FreeTexture(FlagTex); |
733 FreeTexture(FlagTex); |
735 end; |
734 end; |
736 |
735 |
737 Dispose(TeamsArray[i]); |
736 Dispose(TeamsArray[i]); |
738 end; |
737 end; |
739 for i:= 0 to Pred(ClansCount) do |
738 for i:= 0 to Pred(ClansCount) do |
740 Dispose(ClansArray[i]); |
739 Dispose(ClansArray[i]); |
741 end; |
740 end; |