Changeset 109 for trunk/Forms/FormScore.pas

Timestamp:

Dec 10, 2024, 10:38:11 AM (5 weeks ago)

Author:

chronos

Message:

• Modified: Added more score information.
• Fixed: Record only non-zero scores.

File:

• trunk/Forms/FormScore.pas (modified) (1 diff)

trunk/Forms/FormScore.pas

@@ -43 +43 @@
   with FScores[Item.Index] do begin
     Item.Caption := DateTimeToStr(StartTime);
+    Item.SubItems.Add(BoardSize);
     Item.SubItems.Add(IntToStr(Score));
+    Item.SubItems.Add(IntToStr(1 shl BiggestTile));
     Item.SubItems.Add(IntToStr(Moves));
     Item.SubItems.Add(IntToStr(UsedUndos));
-    Item.SubItems.Add(BoardSize);
+    Item.SubItems.Add(IntToStr(DisabledTiles));
+    Item.SubItems.Add(IntToStr(UnmergeableTiles));
+    Item.SubItems.Add(TimeToStr(Duration));
   end;
 end;