Changeset 144 for trunk/NoTerm.pas

Timestamp:

May 11, 2018, 11:57:25 PM (7 years ago)

Author:

chronos

Message:

• Modified: More code refactoring related to players brain selection.

File:

• trunk/NoTerm.pas (modified) (2 diffs)

trunk/NoTerm.pas

@@ -234 +234 @@
         begin // game ended, update statistics
           for p := 1 to nPlOffered - 1 do
-            if bixView[p] >= 0 then
+            if Assigned(PlayersBrain[p]) then
               if 1 shl p and G.RO[me].Alive = 0 then
                 inc(ExtStat[p]) // extinct
@@ -323 +323 @@
   Canvas.Font.Assign(UniFont[ftSmall]);
   for i := 1 to nPlOffered - 1 do
-    if bixView[i] >= 0 then
+    if Assigned(PlayersBrain[i]) then
     begin
       Frame(Canvas, xBrain[i] - 24, yBrain[i] - 8 - 16, xBrain[i] - 24 + 111,
         yBrain[i] - 8 - 16 + 111, MainTexture.clBevelShade,
         MainTexture.clBevelShade);
-      FrameImage(Canvas, Brains[bixView[i]].Picture, xBrain[i],
+      FrameImage(Canvas, PlayersBrain[i].Picture, xBrain[i],
         yBrain[i] - 16, 64, 64, 0, 0);
       if 1 shl i and G.RO[me].Alive = 0 then