Changeset 312 for trunk/LocalPlayer

Timestamp:

Mar 17, 2021, 10:42:18 AM (4 years ago)

Author:

chronos

Message:

• Modified: TGrExtDescr record changed to class. GrExt changed to dynamic array.

Location:

trunk/LocalPlayer

Files:

• Term.pas (modified) (1 diff)
• Tribes.pas (modified) (1 diff)

trunk/LocalPlayer/Term.pas

@@ -2546 +2546 @@
           Jump[0] := 999999;
         GameMode := Command;
-        for i := 0 to nGrExt - 1 do
-          FillChar(GrExt[i].pixUsed, GrExt[i].Data.height div 49 * 10, 0);
+        for i := 0 to GrExt.Count - 1 do
+          GrExt[i].ResetPixUsed;
         IsoEngine.Reset;
         Tribes.Init;

trunk/LocalPlayer/Tribes.pas

@@ -623 +623 @@
       ok := True;
       TestPic.GrName := Copy(Input, 8, 255) + '.png';
-      HGr := nGrExt - 1;
+      HGr := GrExt.Count - 1;
       while (HGr >= 0) and (GrExt[HGr].Name <> TestPic.GrName) do
         Dec(HGr);