Changeset 531 for trunk/Start.pas

Timestamp:

Mar 27, 2024, 12:31:14 PM (8 months ago)

Author:

chronos

Message:

• Modified: Code cleanup.

File:

• trunk/Start.pas (modified) (4 diffs)

trunk/Start.pas

@@ -1623 +1623 @@
   NewName: string;
   F: file;
-  ok: Boolean;
+  Ok: Boolean;
   MapPictureFileName: string;
 begin
@@ -1652 +1652 @@
         AssignFile(F, GetMapsDir + DirectorySeparator + List.Items[List.ItemIndex] +
           CevoMapExt);
-      ok := True;
+      Ok := True;
       try
         if Page = pgLoad then
@@ -1660 +1660 @@
       except
         // Play('INVALID');
-        ok := False;
+        Ok := False;
       end;
       if Page <> pgLoad then begin
@@ -1674 +1674 @@
         end;
       end;
-      if ok then begin
+      if Ok then begin
         if Page = pgLoad then
           FormerGames[List.ItemIndex] := NewName