Changeset 246 for branches/highdpi/Database.pas

Timestamp:

May 21, 2020, 8:17:38 PM (4 years ago)

Author:

chronos

Message:

• Modified: Update from trunk rev 245.
• Modified: Vcl prefix/suffix changed to Native.

File:

• branches/highdpi/Database.pas (modified) (2 diffs)

branches/highdpi/Database.pas

@@ -29 +29 @@
 
   CityOwnTile = 13;
+
+type
+  TGameMode = (moLoading_Fast, moLoading, moMovie, moPlaying);
 
 var
@@ -45 +48 @@
   GTurn: Integer; { current turn }
   GTestFlags: Integer;
-  Mode: (moLoading_Fast, moLoading, moMovie, moPlaying);
+  Mode: TGameMode;
   GWonder: array [0 .. 27] of TWonderInfo;
   ServerVersion: array [0 .. nPl - 1] of integer;