Changeset 716

Timestamp:

Jan 4, 2026, 6:13:18 PM (21 hours ago)

Author:

chronos

Message:

• Fixed: Support both books with graphics name with and without .png file extensions.

Location:

trunk/LocalPlayer

Files:

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

trunk/LocalPlayer/Term.pas

@@ -823 +823 @@
     with Tribe[P].ModelPicture[mix] do
     begin
-      HGr := LoadGraphicSet(Picture.GrName + PngExt);
+      HGr := LoadGraphicSet(Picture.GrName);
       pix := Picture.pix;
     end;

trunk/LocalPlayer/Tribes.pas

@@ -493 +493 @@
         Dec(I);
       Assert(I >= 0);
-      Assert(PictureList[I].HGr = LoadGraphicSet(GrName + PngExt));
+      Assert(PictureList[I].HGr = LoadGraphicSet(GrName));
       Assert(PictureList[I].pix = pix);
       ModelPicture[mix].HGr := PictureList[I].HGr;
@@ -503 +503 @@
       with ModelPicture[mix] do
       begin
-        HGr := LoadGraphicSet(GrName + PngExt);
+        HGr := LoadGraphicSet(GrName);
         pix := Info.pix;
         Inc(HGr.PixUsed[pix]);
@@ -514 +514 @@
       begin
         Input := Script[I];
-        if Input = '#UNITS ' + ExtractFileNameOnly(GrName + PngExt) then
+        if Input = '#UNITS ' + ExtractFileNameOnly(GrName) then
           Ok := True
         else if (Input <> '') and (Input[1] = '#') then
@@ -626 +626 @@
       Ok := True;
       TestPic.GrName := Copy(Input, 8, 255);
-      HGr := GrExt.SearchByName(TestPic.GrName + PngExt);
+      HGr := GrExt.SearchByName(TestPic.GrName);
     end
     else if (Input <> '') and (Input[1] = '#') then