Changeset 110

Timestamp:

Oct 4, 2022, 7:53:57 PM (2 years ago)

Author:

chronos

Message:

• Fixed: Wrong registry path separator.

Location:

trunk

Files:

• UCity.pas (modified) (2 diffs)
• UEngine.pas (modified) (2 diffs)

trunk/UCity.pas

@@ -95 +95 @@
 begin
   for City in Self do begin
-    City.LoadFromRegistry(TRegistryContext.Create(Context.RootKey, Context.Key + '/' + City.SysName));
+    City.LoadFromRegistry(TRegistryContext.Create(Context.RootKey, Context.Key + '\' + City.SysName));
   end;
 end;
@@ -104 +104 @@
 begin
   for City in Self do begin
-    City.SaveToRegistry(TRegistryContext.Create(Context.RootKey, Context.Key + '/' + City.SysName));
+    City.SaveToRegistry(TRegistryContext.Create(Context.RootKey, Context.Key + '\' + City.SysName));
   end;
 end;

trunk/UEngine.pas

@@ -3319 +3319 @@
     HighestServedPassengerCount := ReadIntegerWithDefault('HighestPassengers', 0);
     HighestServedDaysCount := ReadIntegerWithDefault('HighestDays', 0);
-    Cities.LoadFromRegistry(TRegistryContext.Create(RegistryContext.RootKey, RegistryContext.Key + '/Cities'));
+    Cities.LoadFromRegistry(TRegistryContext.Create(RegistryContext.RootKey, RegistryContext.Key + '\Cities'));
   finally
     Free;
@@ -3334 +3334 @@
     WriteInteger('HighestPassengers', HighestServedPassengerCount);
     WriteInteger('HighestDays', HighestServedDaysCount);
-    Cities.SaveToRegistry(TRegistryContext.Create(RegistryContext.RootKey, RegistryContext.Key + '/Cities'));
+    Cities.SaveToRegistry(TRegistryContext.Create(RegistryContext.RootKey, RegistryContext.Key + '\Cities'));
   finally
     Free;